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Liebe  Leser, 

immer  wieder  hört  man  in  der  Computerbranche  das  Schlagwort  ” Sommerloch 
Damit  sind  die  heißesten  Sommermonate  gemeint,  in  denen  viele  Computer  abge¬ 
schaltet  bleiben  und  ein  Sprung  ins  kühleNaß  dem  Computerspaß  vorgezogen  wird. 
Während  dieser  Zeit  wird  es  meist  ruhig  auf  dem  Soft-  und  Hardwaremarkt,  neue 
Produkte  werden  für  die  kalten  Winterabende  vorbereitet. 

Die  Situation  auf  dem  Schneider/ Amstrad-Markt  stellt  sich  jedoch  völlig  gegen¬ 
sätzlich  dar,  hier  tut  sich  mal  wieder  einiges. 

Die  vierte  Amstrad-Show  in  England  ( ausführlicher  Bericht  im  Innenteil)  signa¬ 
lisierte  ganz  eindeutig:  der  Amstrad/ Schneider-Markt  kennt  kein  Sommerloch! 
Zur  Zeit  ist  die  ganze  Branche  am  Rotieren,  ständig  sind  Meldungen  zu  ver¬ 
nehmen,  in  denen  neue  Produkte  angekündigt  werden. 

Der  sagenumwobene,  neue  Schneider  Computer  ist  zur  Zeit  allerdings  noch  nicht 
in  Sicht;  selbst  in  England  hüllt  man  sich  noch  in  großes  Schweigen. 

Der  Besuch  der  Amstrad-Show  war  für  die  CPC-Redaktion  trotzdem  sehr  infor¬ 
mativ.  Unser  Bild  zeigt  nur  einen  kleinen  Teil  der  neuen  Produkte,  die  wir  aus 
England  mitgebracht  haben. 

Um  Ihnen  diese  aktuellen  Informationen  nicht  vorzuenthalten,  mußten  wir  leider 
einige,  bereits  angekündigte  Beiträge  verschieben. 

Davon  betroffen  ist  zum  einen  der  geplante  HF-Modulator,  den  wir  allerdings 
schon  bald  nachreichen  werden.  Zum  anderen  wurden  der  UDG-Designer  und 
die  zweite  RS-232  Schnittstelle  kurzfristig  verschoben. 

Wirmeinen,  daß  diese  kleine  Veränderung  der  Aktualität  von  CPC  International 
zugute  kommt  und  wünschen  Ihnen  allen  "heiße”  Computertage  bzw.  einen  er¬ 
holsamen  Urlaub. 


Herz  liehst  Ihr 


(Stefan  Ritter) 
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Vom  13.  - 15.  Juni  war  London  Schauplatz  der  vierten  Amstrad  Com¬ 
puter  Show.  Ihre  CPC-Redakion  war  natürlich  mit  von  der  Partie  und 
hat  sich  aufmerksam  umgesehen.  Was  die  vierte  Amstrad-Show  alles 
zu  bieten  hatte,  zeigt  unser  großer  Messebericht.  g 
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Lernen  mit  Hilfe  des  Computers  -  der  Leitfaden  unserer  CAL-Rubrik. 
"Loco ' '  ist  ein  pädagogisch  hervorragend  aufbereitetes  Lernprogramm 
für  Jung  und  Alt,  das  viel  Spaß  bereitet  und  zudem  die  Grundrechenar¬ 
ten  spielerisch  üben  läßt. 

S.  62 


Mit  unserem  Programm-Hit  des  Monats  aus  der  Sparte  A  n  Wendungen 
haben  wir  mal  wieder  einen  Volltreffer  gelandet.  Das  Grafik- 
Programm  "Paint  Master"  erinnert  in  Bedienerkomfort,  Geschwindig¬ 
keit  und  Leistungsfähigkeit  an  professionelle  Grafiksysteme- überzeu¬ 
gen  Sie  sich  selbst. 


illlllllllllliii 


1111111111111111111111111111  i 


Berichte: 


Vierte  Amstrad-Show  zeigt  neue  Wege 

-  Bericht  von  der  Amstrad-Messe  in  London  16 

Fremdmonitore  am  CPC 

-  wie  externe  Monitore  an  den  CPC 

angeschlossen  werden  52 

C’86  im  Zeichen  des  Handwerks 

-  die  Kölner  Computerschau  im  Überblick  130 


Serie: 


Das  Software-Experiment 

-  Folge  2:  Das  Spiel  des  Lebens  120 


Hardware: 


Präzision  im  Selbstbau 

-  Testbericht  des  Selbstbau-Plotters  PL22/B  20 

Eproms  am  CPC 

-  die  Software  zum  Eprom-Programmieren  22 

Das  Tor  zur  Welt 

-  der  ECB-Bus  67 

Schneiderware  #3 

-  serielle  Schnittstelle  im  Selbstbau  70 


Tips  &  Tricks: 


Der  Tip  des  Monats:  Musikinterrupt 

-  Hintergrundmusik  per  Interrupt  78 

Lister  II 

-  Pascalprogramm  für  CPC  und  Joyce!!  80 

CPC-Listingservice 

-  Checksummer  als  Eingabehilfe  82 

Rückfahrkarte  für  Parameter 

-  das  Zurückholen  von  Parametern  84 

Grafik-Hardcopy  für  Anspruchsvolle 

-  8-Bit  Hardcopy  84 

Firmware-Erweiterung 

-  Routinen  zur  Assemblerprogrammierung  87 


Joyce: 


Copypic 

-  Logo-Grafik  schwarz  auf  weiß 

91 

Funktionenplot 

-  grafische  Darstellung  von 
mathematischen  Funktionen 

97 

Grafik  auf  dem  Joyce 

-  mit  Grafik-  und  Sonderzeichen 

103 

Fontlib 

-  Zeichensatzverwaltung  für  Dr.  Draw 
auf  dem  Joyce 

106 

StarMail 

-  Testbericht 

110 

Joyce-Trainingsseminare 

-  bundesweites  LocoScript-Training 

133 

CP/M: 


CP/M  und  seine  Möglichkeiten 

-  Programmieren  in  Fortran  59 


4  CPC  8  '86 


ii  m  ii  iinmiiiiiiiiimi 


1 1  NI  1 1 1 1 1 1 II 1 1 1 1 1 1  ■  1 1 1 1 1 1 


1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 ■■ 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 ■■ I B 1 1 1 1 1 N 1 1 1 1 1 1 1 II 1 1 1 1 1 1 


. Inhalt- 


Programme: 

Ortwins  Run 

-  schnelles  Actionspiel 

mit  fantastischer  Grafik  und  Sound. 

Mit  Games-Designer! 

34 

Der  Programm-Hit  des  Monats:  Paint  Master 

-  Super-Grafikprogramm  mit  vielen  Optionen 

112 

Lehrgänge: 

Floppykurs 

-  der  Aufbau  einer  Diskette 

12 

Basic  für  Einsteiger 
-  Lade-  und  Speicherroutinen  zur 
CPC-Adressverwaltung 

Pascal 

32 

-  Ausdrücke  und  Anweisungen 

Z-80  Assembler 

28 

-  Befehle  zur  Einzelbitverarbeitung 

88 

CAL: 

Lokomotive 

-  spielerisches  Lernen  der  Grundrechenarten 

62 

Software  Reviews: 

Anwendungen: 

Laser  Basic 

42 

Vector 

42 

AMX-Utilities 

44 

Spiele: 

Heavy  on  the  Magick 

44 

Winter  Games 

45 

Tomahawk 

46 

Pacific 

48 

The  Battle  beyond  the  Stars 

49 

Thing  on  a  Spring 

50 

Abenteuer: 


Gamers  Message 

132 

Rubriken: 

Editorial 

3 

Impressum 

3 

Leserbriefe 

6 

Schneider  Aktuell 

14 

Bücher 

66 

Händlerverzeichnis 

126 

Computer-Clubs 

127 

Kleinanzeigen 

128 

Inserentenverzeichnis 

133 

Vorschau 

134 

Der  CPC  geht  fremd!  Wir  zeigen  Ihnen,  wie  Sie  externe  Farbmonitore 
an  Ihren  CPC  anschließen  können.  Wie  immer,  gibt  es  dazu  jede  Menge 
Grundlagen  und  Hintergrundinformationen  -  ein  wahrer  Lecker¬ 
bissen! 

S.  52 


Joyce  und  Grafik- unter  diesem  Motto  steht  die  Joyce-Rubrik.  Mit  eini¬ 
gen  Tricks  lassen  sich  auch  auf  dem  Joyce  Grafiken  erzeugen,  die  auch 
ohne  die  berüchtigte  GSX-  Schnitts  teile  auskommen. 

S .  91 


Das  Software-Experiment  bietet  diesmal  eine  originelle  Version  des  be¬ 
kannten  Game  of  Life.  Des  weiteren  erwartet  Sie  das  Programm 
” Reproduktionsmuster”  -  eine  in  dieser  Form  wohl  einmalige 
Simulation. 

s . 
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Eine  Bitte  an 
unsere  Leser 

Die  Rubrik  »Leserbriefe«  ist 
eine  Einrichtung  für  alle  Le¬ 
ser,  die  in  irgendeiner  Form 
Fragen,  Probleme  oder  An¬ 
regungen  zu  Produkten,  Pro¬ 
grammierproblemen  oder  zu 
unserer  Zeitschrift  haben. 
Selbstverständlich  sind  wir 
bemüht,  alle  Leserfragen  zu 
beantworten.  Doch  haben 
Sie  bitte  Verständnis,  daß  wir 
nicht  alle  eingehenden  Briefe 
persönlich  beantworten  kön¬ 
nen.  Oft  erreichen  uns 
mehrere  Briefe  zum  gleichen 
Thema,  einer  davon  wird 
dann  stellvertretend  für  alle 
in  unserer  Zeitschrift  beant- 

Context/Typenrad 

Zuerst  einmal  möchte  ich 
Sie  herzlich  zu  dem  Programm 
” Context ”  aus  Heft  4/86 
beglückwünschen.  Es  ist  das 
erste  Programm  aus  Pro¬ 
grammzeitschriften,  das  auch 
das  hält,  was  es  verspricht 
und  sogar  ohne  Fehler  läuft. 
Zur  Anpassung  an  verschie¬ 
dene  Druckerversionen  (ESC- 
Sequenzen)  werden  Sie  sicher¬ 
lich  einige  Zuschriften  er¬ 
halten  und  daraus  eine  Ta¬ 
belle  erstellen  können. 

Was  aber,  wenn  man  eine 
Druckerroutine  benötigt,  die 
keine  dieser  Sequenzen  be¬ 
nötigt?  Z.B.  besitze  ich  eine 
Typenradschreibmaschine 
(Olympia-Carrera)  mit  In¬ 
terface.  Leider  werden  noch 
zwei  ASCII-Zeichen  anders 
als  die  Norm  interpretiert 
(Zeichen  "<"  und 
Kurzentschlossen  wird  also 
eine  Konvertierroutine  ge¬ 
schrieben.  Weil  sie  kurz  und 


wortet.  Da  auch  wir  nicht  alle 
Fragen  auf  Anhieb  beant¬ 
worten  können,  müssen  wir 
recherchieren.  Und  das  dau¬ 
ert  bekanntlich  seine  Zeit!! 
Wir  möchten  hiermit  alle 
CPC-Leser  noch  einmal  auf 
unseren  Leser-Service  hin- 
weisen  und  bitten  bei  der 
Vielzahl  der  eingehenden 
Briefe  um  etwas  Geduld.  Für 
eilige  Anfragen  steht  unsere 
Redaktion  jeden  Mittwoch 
von  17  -  20  Uhr  am  »Heißen 
Draht«  zur  Verfügung.  Vie¬ 
len  Dank  für  Ihr  Verständnis. 

Ihre  CPC-Redaktion 

PS:  Die  Redaktion  behält  sich 
vor,  Leserzuschriften  in  ge¬ 
kürzter  Form  wiederzugeben. 

schnell  sein  soll,  wird  sie  in 
Assembler  angefertigt.  Das  so 
erstellte  Programm  wird  in 
DA  TA-Zeilen  abgelegt  und  in 
Context  eingebaut.  -  Nur  an 
welcher  Speicheradresse  darf 
sie  abgelegt  werden  ?  Der  nor¬ 
male  Weg  ist  einfach  mit  dem 
MEMOR  Y-Befehl  den  Spei¬ 
cherbereich  festzulegen.  Die¬ 
se  Methode  endet  aber früher 
oder  später  bei  Context  im 
Programmnirwana.  Warum? 
-  Der  Druckertreiber  arbeitet 
im  Interrupt-Modus  und 
schaltet  Interrupts  bei  der 
Zeichenausgabe  ab,  und  so 
kann  zufällig  RAM  oder  ROM 
(Adressbereich  &0000  - 
&3FFF)  eingeschaltet  sein. 
Wo  dann  die  Konvertierrou¬ 
tine  unterbringen?  Nun,  das 
Maschinenprogramm  disas- 
semblieren  und  sehen,  wo 
man  es  ändern  kann,  ist  zu 
umständlich.  Lediglich  der 
CALL-Befehl  zur  Ausgabe 
eines  Zeichens  an  den  Cen- 


tronic-Port  erhält  man  so. 
(Adr.:  &9C44).  Eine  andere 
Methode,  den  Textspeicherzu 
kürzen,  gefallt  mir  nicht.  Auf 
der  Suche  nach  weiteren  Lö¬ 
sungenfiel  mir  der  SYMBOL 
AFTER-Befehl  auf.  Hierbei 
wird  eine  Zeichenmatrix  im 
RAM  untergebracht,  auch  im 
Programm  Context.  Es  wer¬ 
den  jedoch  die  Zeichen  127 
bis  199  gar  nicht  zur  Darstel¬ 
lung  benötigt.  Folglich  ist  es 
ohne  Bedeutung,  wie  diese 
Zeichenmatrix  aussieht.  Ab 
Adresse  &A  1D3  beginnt  die¬ 
ser  Zeichensatz  in  Context. 
Acht  Byte  pro  Zeichen  erge¬ 
ben  die  Adresse  &A2F4  für 
das  Zeichen  127.  Hier  kann 
also  das  Konvertierprogramm 
beginnen.  Außerdem  gehört 
dieser  Speicherbereich  zum 
nicht  überlappten  RAM-Be- 
reich.  Dadurch  ist  ein  Stö¬ 
rung  durch  ROM/RAM- 
Schaltungen  ausgeschlossen. 
Die  Konvertierroutine  fängt 
nun  alle ESC-Sequenzen  ab 
und  kodiert  die  Zeichen  ”<” 
und  ”>”  in  die  benötigten 
Zeichenfolgen  um.  Dabei 
hilft  die  Tatsache,  daß  jede 
ESC-Sequenz  aus  drei  Zei¬ 
chen  besteht.  Unterstreichen 
ist  mit  einer  Schreibmaschine 
durch  Zurücksetzen  des 
Schreibkopfes  möglich.  Eine 
einfache  ESC-Sequenz  reicht 
dazu  nicht.  Deshalb  legt  die 
MC-Routine  noch  einen  ei¬ 
genen  Merkspeicher  (3  Byte) 
an  und  unterstreicht  jedes 
Zeichen,  bis  die  Sequenz  zum 
Abschalten  (DB  27,45,0)  er¬ 
scheint.  Um  das  Programm 
Context  bedienerfreundlich 
zu  halten ,  werden  noch  einige 
Schönheitsänderungen  neben 
der  Konvertierroutine  ins  Pro¬ 
gramm  eingefügt. 

Die  Änderungen  sehen  dann 
folgendermaßen  aus: 

(siehe  Listing  Context/Ty- 
penrad) 

Reinhard  Pekx, 
Duisburg 

Context  - 
Okimate  20 

Vorab  will  ich  Ihnen  erst  mal 
sagen,  daß  dieses  Textverar¬ 
beitungsprogramm  aus  mei¬ 
ner  Sicht  wirklich  spitze  ist. 
Besonders  toll  ist,  daß  sich 
die  Mühe  des  Abtippens, 
Fehler-(Tipp-  usw.)  ausmär- 
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85  conv=8A2F4 
185  GOSUB  2235 
1340  nlq=1 :CALL  conv:GOSUB  1830:GOTO  1290 

1350  nlq=0 :POKE  89C44 , 831 :POKE  89C45,  8BD:GOSVB  1830:GOTO  1290 
1830  PEN  1  +nlq :  LOCATE  1 6,  4 : PRINT"01ympia" 

1840  PEN  2-nlq: LOCATE  16, 6 : PR I NT" EPSON RETURN 
2235  RESTORE  2270:x=0:FOR  i=0  TO  I33:READ  j:x=x+j 
2240  POKE  conv+i, j:NEXT  i:READ  j 
2245  JF  x=j  TUEN  RESTORE : RETURN  ELSE  2410 
2270  DATA  82  1 , 805,  8A3 ,  822 ,  844 ,  89C,  8AF ,  832,  87A,  8A3 
2280  DATA  832 , 87B,  &A3 , 832 ,  &7C ,  &A3 ,  &C9 , &F5,  83A,  87A 
2290  DATA  8A3, &B7, 828,  812, 83D, 832, &7A, 8A3, 828, 806 
2300  DATA  8F1 , 832 , 87C, 8A3 , 837, 8C9, 8F1 , 832, 878, 8A3 
2310  DATA  837, 8C9, 8F1 , 8FE, 8IB.  820,  807,  83E,  802,  832 
2320  DATA  87A, 8A3 , 837, 8C9, 8B5, 8D5, 82A, 87B, 8A3, 81 1 
2330  DATA  801 ,82D,8A7,8ED,  852,  8D1 ,8E1 , 820.  80C,  8F5 
2340  DATA  83E , 85F ,  8CD,  864 ,  8A3 ,  83E ,  808 ,  8CD,  864 ,  8A3 
2350  DATA  8F1 ,8F5,  8FE,  83C,  828,  81 1 , 8FE,  83E,  820,  807 
2360  DATA  83E, 81B, 8CD,  864,  8A3 ,  83E,  864,  8CD,  864,  8A3 
2370  DATA  8F1 , 837,  8C9, 83E,  81 B,  8CD,  864,  8A3,  83E,  862 
2380  DATA  818,  8F1 ,  8CD, 82E, 8BD,  838,  8FB,  8C5,  806,  8EF 
2390  DATA  8E6,  87F,  SED,  879, 8F6,  880, SED, 879,  8E6, 87F 
2400  DATA  SED , 879 ,  8C1 ,  8C9 ,  1682 5 
2410  PRINT"Fehler  in  DAT As  l!!":STOP 


zens  und  der  Druckeranpas¬ 
sung  absolut  gelohnt  hat. 
Machen  Sie  weiter  so! 

Nun  zur  Anpassung: 

Der  Okimate  20  bietet  über 
die  im  Context-Programm 
gebotenen  Möglichkeiten  noch 
die  Umstellung  auf  Elite, 
Kursiv  und  die  Wahl  zwi¬ 
schen  diversen  nationalen 
Buchstabentypen.  Gleich  vor¬ 
weg:  dieses  zu  realisieren  ist 
mir  nicht  gelungen. 
Anschließend  einige  Pro¬ 
grammänderungen  (s.  Ta¬ 
belle  Programm-Anderungen): 
Die  weiteren  Änderungen 
beziehen  sich  ausschließlich 
auf  den  Maschinencode. 
Fettdruck: 

AUS 

4500 -&49  an  &9F2A  (3.  Byte) 
EIN 

4530  -  &54  an  &9F42  (3.  Byte) 
Unterstreichen: 

AUS 

4480-  &44  an  &9F1E  (7.  Byte) 
EIN 

4510  -  &43  an  &9F33  (4.  Byte) 
4510  -  00  an  &9F34  (5.  Byte) 
Zeichen  Verdichtung 
(Condensed): 

AUS 

4490  -&1E  an  &9F23  (4.  Byte) 
(IE  entspricht  Rückkehrzu  PICA) 
EIN 

4520  -&1D  an  &9F38  (1.  Byte) 
Vergrößerte  Schrift 
(gedehnt): 

AUS 

4490  -&1E  an  &9F20  (1.  Byte) 
(IE  entspricht  Rückkehrzu  PICA) 
4490  -  00  an  &9F21  (2.  Byte) 
EIN 

4510  - &1F  an  &9F35  (6.  Byte) 
4510  -  00  an  &9F36  (7.  Byte) 
4510  -  00  an  &9F37  (8.  Byte) 
Papiermangel  nicht  überge¬ 
hen: 

4470  -  00  an  &9F11  (2.  Byte) 
4470  -  00  an  &9F12  (3.  Byte) 
Tiefgestellte  Zeichen 
(Index): 

EIN 

4520  -&4C  an  &9F3F  (8.  Byte) 
4530  -  00  an  &9F40  (1.  Byte) 
AUS 

4490  - &4D  an  &9F27  (8.  Byte) 
Hochgestellte  Zeichen 
(Exponent): 

EIN 

4520 -&4A  an  &9F3C  (5.  Byte) 
AUS 

Uber  zweimaliges  Hinzufü¬ 
gen  des  Index-Zeichens,  an¬ 
sonsten  zu  handhaben  wie  in 
der  Programmbeschreibung 
dargestellt. 
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I JOYCE-PROFI-PROGRAMME I 


5  Punkte  die  für  ALGO-SOFT-PROGRAMME  sprechen: 


i  Extrem  ^ 

Verständlich  geschriebenes,  § 

^  Von  Praktikern 

A  Sehr  hohe  | 

™  AnwendungS' 

I  einfache 

J  ausführliches  und 

^  für  die  Praxis  ^ 

J,|  Verarbeitungs-  • 

sicher  durch 

I  ■  Bedienung!  4 

^  ■  deutsches  Handbuch !  \ 

J  ■  entwickelt !  L“ 

T  ■  geschwindigkeit !  \ 

m  Praxistests! 

NEU 


NEU 


NEU 


NEU 


NEU 


ALGO-RHYTHMUS I 


•  Adressen-Briefverwaltungsprogramm 

•  Unbegrenzte  Adressenzahi  speicherbar 

•  Adressen  mischen  mit  Einzel-  und  Gruppenbriefen 

•  15  individuelle  Anreden  pro  Adresse 

•  Diverse  Schriftarten 

•  Etikettendruck 

•  Einzelblatt  und  Endlos 


ALGO-KART I 


•  Freies  Dateiverwaltungsprogramm 

•  Maximal  100  Felder.  Jedes  Feld  kann  beliebig  lang 
gewählt  werden 

•  Maximal  1.500  Zeichen  pro  Datensatz 

•  Masken  frei  erstellbar 

•  Suchen  und  Sortieren  nach  jedem  Feld 


ALGO-HAUS I  |  ALGO-HANDWERK I 


•  Professionelles  Programm  zur  Haus-  und  • 

Wohnungsverwaltung 

•  ca.  1 00  Mieter  pro  Haus  verwalten 

•  Beliebig  viele  Häuser  verwalten  ® 

•  Sämtliche  Mieterdaten  verwalten 

•  Komplette  Buchhaltung 

•  Jahresabrechnung  erstellen  • 

•  Heizkostenabrechnung  erstellen 

•  Bankeinzüge,  Überweisungen  • 

•  Automatisch  oder  individuell  Mahnungen  schreiben  • 


Professionelles  Programm  zur  Erstellung  von 
Angeboten,  automatische  Kalkulation  und 
Errechnung 

Vor-  und  Nachkalkulation: 

Einzel-  und  Arbeitspreise  aus  den  Faktoren 
Materialeinkauf,  Verbrauch,  Stundenlohn  und  Stunden 
leistung  blitzschnell  kalkulieren 
200  Standartleistungstexte  (Bausteine) 
individuell  erstellbar 

Textausdruck  ohne  Preis  (Blankettendruck) 
Leistungsbeschreibung  mit  Zeitvorgabe 
Nachträgliches  Einfügen  und  Löschen  von  Positionen 
Automatische  Rechnungserstellung  aus  Angeboten 


ALGO-RHYTHMUS  I  149, •DM  ALGO-KART  I  79,-  DM 

ALGO-HAUS  I  998,-  DM  ALGO-HANDWERK  I  998,-  DM 

ALGO-SOFT-PROGRAMME  erhalten  Sie  bei  ALGO  oder  Ihrem  Schneider-Fachhändler 


A.H.W.  Gosch  oHG 

Grindelallee  138  •  2000  Hamburg  13  •  -©040/446301 


-  Ausschneiden  und  auf  Postkarte  kleben !  - 

□  Hiermit  bestelle  ich  per  Nachnahme/Vorkasse 

□  Senden  Sie  mir  bitte  ausführliche  Programmbeschreibung 

für _ 

Name _ 


Vorname 
Wohnort 
Straße  _ 


Datum,  Unterschrift 


Auslandssendungen  nur 
gegen  Vorkas.se  Alle 
Preise  verstehen  sich  mkl. 
14%  MwSt  und  zzgl  DM 
5-  tur  Porto  und  Ver¬ 
packung  Alle  Preise  sind 
unverbindliche  Preisemp- 
fehlungen 


Briefe . 

HHimmiiiiiiimiiiiiMiMiimii  1 1 1 1  iiitHimiiiii  1 1  iniiitii  1 1 1  mminiiiiii  i  ii 
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Hiiliiiaiiii  aiiaiiii i«iiiiii 

Programm  -  Änderungen 

Basic 

MC 

NLQ 

80  - 

nlq=»9FlB 

4480 

-  »31 

an 

»9F1B  (4. Byte) 

1340  - 

POKE  nlq , »31 

4480 

-  00 

an 

&9F1C  (5. Byte) 

1350  - 

POKE  nlq, »30 

1830  - 

PEN  l+(PEEK(nlq) -48) 

1840  - 

PEN  2-  PEEK ( nlq ) +48 

Zeilenabstand 

1380  - 

an=PEEK(mzei)+l : IF  an>101  then 

170 

-  &3C 

an 

»9322  C3.Byte) 

an*21 

120 

-  11198 

1390  - 

POKE  mzei ,an : POKE  cabs , 1440/ ( an- 1 ) 

4470 

-  »1B 

an 

»9F16  (7.Byte) 

1850  - 

an=PEEK  Cmzei) 

1860  - 

PEN  2 : LOCATE  20,12:PRINT  USING 

4470 

-  »25 

an 

»9F17  (8. Byte) 

•'##.#";  (254/ (an- 1)  3-2,4 

4480 

-  »39 

an 

»9F18  (I.Byte) 

1870  - 

: LOCATE  20, 14: PR INT  an: RETURN 

4480 

-  »3C 

an 

»9F19  (2. Byte) 

an=max 

.Zeilenzahl/Seite. Bei  Start  ist  der 

Standard  60 

Zeilen. 

1 1 1  1 1  I  tl  ■■■  1 1 1 1 1 1 1 1  I  1 1 1  i  1 1 1 1 1 1 1 1 1 1 . . . . . . 


wenden.  Ich  wäre  Ihnen  dank¬ 
bar,  wenn  Sie  mir  bei  meinem 
Problem  helfen  könnten. 
Und  hier  die  Anpassung  des 
Programms  an  den  Star 
NL-10: 

Änderungen  im  CONTEXT- 
MC-Basiclader 
Basiczeilen  4440  und  4470 
ändern  in: 

4440 DATA  6123 
4470  DATA  00,1B,38,00, 
1B,52,02,1B 

Änderungen  im  Hauptpro¬ 
gramm: 

Basiczeilen  80,  1360,  1890 
und  1920  ändern  in: 

80  casin=&9E02:cata— 

&  9E3E:cset=&  9F1 6: 


Der  Grund  hierfür  liegt  dar¬ 
in,  daß  beim  Okimate  20  das 
hoch-  bzw.  tiefgestellte  Zei¬ 
chen  separat  abgeschaltet 
wird  und  im  Programm  dafür 
kein  Platz  ist. 

Rainer  Beinlich, 
Braunschweig 

Context 
Star  SG  10 

Als  erstes  möchte  ich  mich 
bei  Ihnen  für  dieses  hervor¬ 
ragende  Programm  bedan¬ 
ken,  mit  dem  auch  dieser 
Brief  geschrieben  ist. 

Doch  nun  zu  den  Änderun¬ 
gen: 

Für  die  Steuersequenzen  sind 
folgende  Speicherstellen  um- 
zupoken. 

POKE  &9F  15,55 
PO  KE  &9F16,n 
POKE  &9F1B, 66 
POKE  &9F23.27 
POKE  &9F24,66 
POKE  &9F25.1 
POKE  &9F 30,66 
POKE  &9F3 1,5 

Außerdem  müssen  im  Basic- 
programm  folgende  Zeilen 
geändert  werden: 

80  :cset—&9F 16: 

1340  POKE  nlq,4: 

1350 POKE  nlq,5: 

1360  ifPEEK(cset)=0  then 
POKE  cset,2  eise 
POKE  cset,  0 

1890  ifPEEK(cset)=0  then 
print’T  eise print  "D” 
1920  if  PEEK(cset)=0  then 
2050 

Da  der  Star  SG- 10  im  Star- 
Modus  keinen  /216  Zeilen¬ 
vorschub  besitzt,  muß  in  Zei¬ 


le  1390 der  Wert: POKE  cabs, 
2304/n:  geändert  werden  in 
:POKE  cabs,  1536/n: 

Horst  Kufferath, 
Duisburg 

Filecopy 

Hiermit  übersende  ich  Ihnen 
einen,  meines  Erachtens,  sehr 
nützlichen  Tip,  der  die  Be¬ 
nutzer  einer  Vortex  RAM- 
Erweiterung  anspricht.  Wie 
Ihnen  ja  sicherlich  bekannt 
ist,  kann  zum  Kopieren  der 
Programme  von  Laufwerk  A 
nach  C,  außer  schwer  erhält¬ 
lichen  diversen  Programmen, 
nur  das  auf  der  jeweiligen 
CP/M-Systemdiskette  mit¬ 
gelieferte  Programm  ”PIP” 
benutzt  werden.  Hier  muß 
allerdings  mit  "WILD- 
CARDS”  auf  sehr  umständ¬ 
liche  Art  und  Weise  kopiert 
werden.  Abhilfe  schafft  hier 
das  von  der  Firma  Vortex  zur 
Speichererweiterung  mitge¬ 
lieferte  Programm  "FILE- 
COPY.COM",  wo  jedoch 
noch  kleinere  Veränderungen 
vorgenommen  werden  müs¬ 
sen  (Filecopy  V2.6). 

Dieses  läuft  wie  folgt  ab: 
Laden  Sie  das  auf  der  Sy¬ 
stemdiskette  befindliche  Pro¬ 
gramm  " DDT.COM ”  mit 
dem  eben  erwähnten  ’’ FILE - 
COPY.COM "  in  den  Spei¬ 
cher  Ihres  CPC’s. 

DDT  FILECOPY.  COM 
Hiernach  meldet  sich  das 
Programm  ” DDT.COM ” 
DDT  Vers  2.2 
Next  PC 
0C00  0100 

Geben  Sie  folgendes  ein: 
S022F 


Nun  erscheint  die  zu  ändern¬ 
de  Speicherstelle  samt  Inhalt 
auf  dem  Bildschirm,  gefolgt 
von  einem  Cursor,  wo  Sieden 
neuen  Wert  hineinschreiben 
können.  Hier  geben  Sie  nun 
anstelle  der  42  eine  43  ein. 
02 2 F  42  43 

Ebenso  verfahren  Sie  mit  den 
Speicherstellen 
0247  0906  092b 
Beenden  Sie  nun  das  Pro¬ 
gramm  "DDT"  mit  dem  Be¬ 
fehl  GO’(null)'. 

Ist  dies  geschehen,  so  geben 
Sie 

SAVE  11  CCOPY.COM 
in  Ihren  Rechner  ein,  womit 
dann  ein  CP/M-File  auf  Ihrer 
Diskette  entstanden  ist,  mit 
dem  Sie  sowohl  selektiv  als 
auch  total  von  Laufwerk  A 
nach  C  und  umgekehrt  ko¬ 
pieren  können. 

Guido  Weise, 
Münster 


Context  Star  NL-10 

Kürzlich  habe  ich  mir  den 
Drucker  Star  NL-10  zuge¬ 
legt.  Sogleich  ging  ich  an  die 
Arbeit  und  tippte  Ihr  Textver¬ 
arbeitungsprogramm  Context 
ein.  Als  einzigste  Anpassung 
an  den  Star  NL-10  mußte  ich 
Änderungen  für  die  Einstel¬ 
lung  des  deutschen  Zeichen¬ 
satzes  vornehmen.  Sonst  läuft 
Context  hervorragend  und 
ich  bin  sehr  zufrieden  mit 
diesem  Programm.  Eine  Fra¬ 
ge  hätte  ich  allerdings  noch. 
Wie  kann  ich  andere  Steuer¬ 
codes  (z.B.  Kursivschrift)  an 
den  Drucker  senden.  Aller¬ 
dings  möch  te  ich  dafür  keine 
schon  belegten  Tasten  ver- 


cabs=&9F  19:nlq= 
&9F1C 

1360  IF  PEEK(cset)=2 
THEN  POKE  cset,0 
ELSE  POKE  cset,  2 
1890  IF  PEEK(cset)=0 
THEN  PRINT’T’ 
ELSE  PR1NT"D" 
1920  IF  PEEK(cset)=0 
THEN  2050 

Lothar  Flegel, 
Willroth 

CRC: 

Wir  geben  Ihre  Frage  an 
unsere  Leser  weiter.  Wer 
einen  NL-10  besitzt  und  das 
Problem  gelöst  hat,  soll  uns 
schreiben. 

Context - 
DMP  2000 

Zur  Anpassung  an  den  Druk- 
ker  DMP  2000  müssen  im 
Programm  folgende  Ände¬ 
rungen  vorgenommen  werden : 
Im  DA  TA-Block  25  des  Ba- 
sicladers: 

Zeile  4440 DATA  6123 
Zeile  4470 DATA  00,1B,38, 
00,  IB, 52,02,18 
oder: 

POKE  &9F15.82  (bzw. 
&52):POKE  &9F  16,02 
Im  Hauptprogramm  müssen 
folgende  Änderungen  vorge¬ 
nommen  werden: 

In  Zeile  80  cset=&9F15 
ändern  auf  cset=&9F  16 
In  Zeile  1360  die  Zahlen  54 
und  55  ändern  auf  02  und 
00 

In  Zeile  1790  die  Zahl  55 
ändern  auf  00 
In  Zeile  1920  die  Zahl  55 
ändern  auf  00 

Willfried  Vandrey, 
Stuvenborn 
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Knack  die  Nuß 

Im  Beitrag  "Knack  die  Nuß”, 
Heft  6/86  hat  sich  ein  Fehler 
eingeschlichen.  Beim  Aus¬ 
druck  des  Listings  1  ist  uns  in 
Zeile  1 70  ein  Fehler  unter¬ 
laufen,  der  zum  Abbruch  des 
Programmes  führt.  Richtig 
heißt  es:  X  =  a/b/c/d/e/f/g. 


5  W9  am  CPC 
464/664 

So  muß  sich  der  CPC  melden, 
wenn  alles  korrekt  abläuft: 
lepm 

a>COPYDISC  2.0 
Please  insert  source  disc  into 
drive  A  and  destination  disc 
into  drive  B  then  press  any 
key: _ 

Copying  started 
Reading  track  1  ((..8)  usw. 

( bis  40)) 

Writing  track  1  ((..8)  «sw. 
(bis  40)) 

Copying  complete 

Do  you  want  to  copy  another 

disc(Y/N): _ 

Ich  benutze  das  Laufwerk 
BASF  6128  Nr.  81670-001 
schon  mehrere  Monate  ohne 
irgendwelche  Beanstandun¬ 
gen.  Das  gleiche  gilt  auch  für 
das  Tandon  Laufwerk. 
Beide  Laufwerke  sind  Dop¬ 
pellaufwerke,  die  allerdings 
nur  einseitig  genutzt  werden, 
da  der  Controller  leider  ei¬ 
niger  Funktionen  beraubt  ist. 
Das  Ansprechen  der  Lauf¬ 
werksmotoren  einschließlich 
Relais  ist  normal  und  liegt 
an  der  von  Schneider  benutz¬ 
ten  Dekodierung.  Hier  wäre 
noch  eine  Verbesserung  mög¬ 
lich,  da  das  Geklicker  des 
Relais  unter  Umständen  lä¬ 
stig  ist. 

Die  von  Ihnen  angegebene 
Fehlermeldung  läßt  auf  eine 
Unterbrechung  im  Kabel 
schließen  bzw.  fehlt  an  Ihrem 
CPC  die  Verbindung  auf  der 
Unterseite  des  CPC  664  vom 
Lötauge  zur  Leiterbahn  25 
des  Port  B.  Dieser  Portan- 
schluß  ist  dafür  zuständig, 
das  Laufwerk  B  zu  selek¬ 
tieren  (siehe  hierzu  Anschluß¬ 
bild  Pin  12  des  BASF  6128). 
Warum  am  Port  B  die  Ver¬ 
bindung  zu  Pin  25  fehlt,  ist 
mir  ein  Rätsel,  denn  wie  soll 
zum  Beispiel  das  Zweitlauf¬ 
werk  auch  von  Schneider 


Briefe 


ohne  diese  Verbindung  lau¬ 
fen? 

Bei  der  Reproduktion  der 
Skizze  ist  eine  kleine  Unge¬ 
nauigkeit  aufgetreten,  die  ich 
nachfolgend  korrigiere: 


Wenn  Sie  die  Umbauanlei¬ 
tung  genau  einhalten,  läuft 
das  Zweitlaufwerk  auf  An¬ 
hieb.  Ich  gehe  davon  aus,  daß 
das  Laufwerk  wirklich  in 
Ordnung  ist.  Mir  wurde  z.B. 
auf  dem  Flohmarkt  ein  BASF 
61 06  verkauft,  welches  trotz 
ausdrücklicher  Versicherung 
nicht  in  Ordnung  war. 

Nun  viel  Erfolg  beim  Anschluß. 

Hans  Ziegler, 
Hundsangen 

Autostart-Fehler 

behoben 

Sicher  hat  sich  schon  jeder 
Maschinensprache-Program¬ 
mierer  über  den  Fehler  ”  im 
Betriebssystem  des  CPC  464 
mit  Floppy  geärgert.  Wird 
nämlich  ein  mit  SA  VE  ”, NA¬ 
ME  ”,  b,Start,LängeJLinsprung 
gespeichertes  Programm  mit 
RUN” NAME” gestartet,  wird 
die  Floppy  abgeschaltet,  so 
daß  man  diese  nicht  weiter  be¬ 
nutzen  kann.  Die  Floppy  wird 
abgeschaltet,  da  bei  dem  Be¬ 
fehl  RUN'NAME”  vor  dem 
Start  des  Programmes,  die 
Routine  MC  START  PRO¬ 
GRAMM  angesprungen  wird. 
Diese  Routine  initialisiert 
nun  alle  Packs  neu,  unter  an¬ 
derem  auch  die  Kassettenrou¬ 
tinen. 

Dies  führt  dazu,  daß  man  die 
Programme  mit: 

10  memory  xxxx 
20  load  "Name” 

30  call  xxxx 

startet.  Dies  kostet  jedoch  je¬ 
desmal  1K  Speicherplatz  auf 
der  Diskette.  Mit  einigen  Be¬ 
fehlen  kann  man  das  Problem 
lösen.  Die  Floppy  wird  wieder 
angeschaltet,  wenn  man  am 


ANFANG  des  Programmes 
folgende  Befehle  einfügt: 
C5.PUSHBC 
El ;  POP  HL 
OE  07 ;  LD  C.&07 
CD  CE  BC ;  CALL  &BCCE 
Ist  eine  Reservierung  des  Spei¬ 
chers  durch  den  MEMORY- 
Befehl  notwendig,  kann  man 
das  mit: 

21  XX  XX  ;  LD  HL, 
Memory  Wert 

22  7B  AE ;  LD  (&AE  7B),  HL 
erreichen. 

Oliver  Kocks 
Hürth 

Hand  und  Fuß 
-  Joyce  berück¬ 
sichtigen? 

Ich  freue  mich  sehr,  daß  Sie  in 
Ihrer  Zeitschrift  auch  an 
Joyce-Benutzer  denken. 

Bitte  machen  Sie  weiter  mit 
Tips  und  Programmen  für  die¬ 
ses  Gerät. 

Können  Sie  auch  in  der  neuen 
Serie  ” Hand  und  Fuß”  den 
Joyce  berücksichtigen?  Das 
wäre  sehr  gut,  denn  in  der 
Hinsicht  gibt  es  bisher  keine 
Veröffentlichungen. 

Wenn  das  zeitlich  nicht  mehr 
geht,  könnten  Sie  vielleicht 
am  Ende  der  Serie  einige  Tips 
geben,  wie  man  die  Schaltun¬ 
gen  für  den  Joyce  abändern 
kann?  Bernd  Franck 

Oldenburg 

CPC: 

Die  Schnittstelle  zwischen 
Joyce  und  SCHNEIDER¬ 
WARE  ist  in  Arbeit.  Mit 
einem  Adapterbaustein  wird 
dann  den  Joyce-Besitzern 
die  CPC-Hardware  zur  Ver¬ 
fügung  stehen. 


Augen  auf  beim  Computerkauf 

Schneider  PCW  8256  Joyce  1648. — 

Schneider  PCW  851 2  Joyce  Plus  2298. — 

Schneider  CPC  464  Keyboard  448.— 

Schneider  CPC  664  Keyboard  (mit  Floppy)  798. — 

Schneider  CPC  61 28  Keyboard  (mit  Floppy)  898, — 
Schneider  Grünmonitor  GT-65  (für  alle  CPC)  348.— 
Schneider  Farbmonitor  CTM-644  (für  alle  CPC)  798. — 
Schneider  CPC  464  mii  Grünmonitor  598. — 

Schneider  CPC  464  mii  Farbmonitor  998. — 

Schneider  CPC  664  mit  Grünmonitor  998, — 

Schneider  CPC  664  mit  Farbmonitor  1498, — 

Schneider  CPC  61 28  mii  Grünmonitor  998 — 

Schneidet  CPC  61 28  mii  Farbmonitor  1498. — 

Schneider  3-ZolFFIoppy-Disk.  DDI-1  648. — 

mit  CP/M  und  Logo 

dllo  als  2  Laufwerk  (ohne  CP/M  u  Logo)  559,— 
Vortex  5  25"-Ftoppy-0isk  F  1  -S  lEmzelst )  1 1 98,— 

Vortex  5  25'-Floppy-Disk  F  1-0 (Doppelst)  1698,— 
Vortex  Aufrüstkil  A 1-S.  F  1-S  aut  E  1-0  498,— 

NEU  Vorlex  M 1  -X  3  5  Zoll  Zweillaotwerk  758— 
NEU  Vorlex  F  1-X  5 25  Zoll  Zweitlaulwerk  758- 
NEU  Vorlex  M  1-XRS  35  Zoll  Zweitlaulwerk  858, — 

NEU  Vortex  F  1-XRS  5  25  Zoll  Zweitlaulwerk  858  — 
Cumana  3  Zoll  Zweitlaulwerk  428, — 

Cumana  5  25  Zoll  Zweitlaulwerk  598 — 

Datenrecorder  Sony  für  CPC  664/6 1 28  98 — 

3  Zoll  Disketten  Panasonic  5  Stück  59.— 

ab  10  Stück  je  11,50  ab  100  Stück  ie  10,50 
5  25  Zoll  Disketten  96  Ipi  für  Vortex-Laulwerke 
1 0  Stück  in  PVC  Hartbox  69,95 

Netzteil  MP  1  lür  Schneider  CPC  464  139. — 

Netzteil  MP  2  für  Schneider  CPC  664/6128  1  59.— 

RAM-Erweiterungen  der  FA  Vortex 
RAM-Erweiterung  SP-64  insgesamt  128  KByte  275, — 
RAM- Erweiterung  SP-128  348— 

RAM-Erweiterung  SP-256  478,— 

RAM-Erweiterung  SP-320  528,— 

RAM-Erweiterung  SP-5 12  589  — 

RAM-Erweiterung  für  Joyce  auf  512  KB  148  — 

FD-2  (2  Lautwerk  für  Joyce  1  MB)  698.— 

üikJschiimtuter  tut  Joyce  89— 

Monüor-DrehfuS  Neigongswmk  slufentos  cinstellb.  3995 
Verlangerungskabel  1  5  m  tur  CPC  464  29.95 

dito  für  CPC  664  und  61 28  34,95 

Quickshol  II  mii  Autolire  1 9.95 

Compclihon  Pro  5000  mit  Mikroschalte'  59  95 
Disketten!*»  lür  40  St  3  Zoll-Disketten  39  95 
Disketten!*»  lür  40  St  3 5  Zoll-Oisxerten  39  95 
Diskettenbox  lür  40  St  5  25  Zoll-Diskcticn  49  95 
Oiskettenbox  t  100  St  5  25”-DiskeUen  m  Schloß  34  95 
Slaubschulzhauben  aus  weichem  Kunsllede-  (Schneider¬ 
graul  lür  CPC  464/664/6128,  NLÖ  401.  DDI-1.  Monitor 


Grun/Farbe 

je  17,95 

konpieit  1  CPC  u  Monitor  (bitte  Gerate  angebenl  29,95 

Akustikkoppler  S  21  d 

279  — 

Supersotlwaie  tui  Ihren  CPC 

Wordstar  3  0 

199.- 

Texlomal 

99- 

dBase  1! 

199- 

Datamal 

99- 

Mulliplan 

199,- 

Profi  Pa  nter 

99- 

Turbo  Pascal  3  0 

219,- 

Profimat 

99- 

Turbo  Pascal  3  0 

Mathemat 

99- 

mH  Grahkunterst 

279.- 

Budgeimanager 

99.- 

Turbo  Tutoi 

99- 

Turli-Lad  Business  148, 

Turbo  Tooibox 

219.- 

Tutb.  Graph  Tooibox  219,- 

C-Basic-Compiier 

169.- 

Pascai/MT^ 

169,- 

Smali-C 

148- 

Turb -Lad  Science  189- 

DR  DRAW 

199- 

DR  GRAPH 

199- 

FIBU-Star  Plus 

298- 

Oatei-Slar 

96- 

Star-Mad 

98,- 

Slar-Writer  1 

196.- 

zum  1  eil  sind  die  Program  me  auch  lür  den  Joycegeeignei. 
daher  lalle  Computertyp  und  Oisktormat  angeben 

DRUCKERPARADE  ORUCKERPARADt 

Malrixdrucker  DMP  2000  678  — 

Epson  LX-80  100  Zeich/Sek  1  KByte  Puffer  896. — 
Epson  FX-85  1 60  Zeich  /Sek  8  KByte  Pullet  1378. — 
Epson  FX-105  160  Zeich /Sek  8  KByte  Putter  1798,— 
Epson HI-80  4-FarbplOtter A4  1298  — 

Panasonic  KX-P  1080  100  Zeich/Sek  798. — 

Panasonic  KX-P  1091  120  Zeich/Sek  898- 

Panasomc  KX-P  1092  180  Zeich/Sek  1 1 98, — 

Panasonic  KX-P  1592  Breitformat  1648, — 

Panasonic  KX-P  31 51  Typenraddrucker  1 54 8. — 

Star  NL 10  698  — 

flilemanF-r- 105  Zeich  /Sek  2  KByte  Puffer  998— 

Druckeranschlußkabel  CPC  464/664  49,— 

dito  jedoch  61 28  59,— 

Super- Oruckerslander  98,— 

Ersatzfarbbänder  ab  Lager  lieferbar 
Endlospapier  weiß  m  Mikroperforation  500  Blatt  19.95 
dito  jedoch  1000  8lall  34.95 

dito  jeodch  2000  Blatt  49,95 

Alte  Geräte  mit  ETZ  und  deutschem  Handbuch 
technische  Unterlagen  je  Gerät  gegen  1.50  0M  in  B'iel- 
marken  Expiessversand  speziell  in  die  Schweiz  und  nach 
Österreich  einfachste  Abwicklung  der  Bezahlung 
Kein  Ladengeschäft  mehr,  nur  Versand 
Abholung  bitte  telefonisch  avisieren!' 

Wangener  Str.  99 
D-7980  Ravensburg 


schauties 

®tkidär®nS<g 
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***  BRANDNEU  *** 

Software  für  JOYCE  PCW  8256/851 2 

*  QUICK-BILL  * 

ANGEBOT/RECHNUNG/ABRECHNUNG 

für 

Baugewerbe,  Handwerk,  Großhandel 
Privat  und  Medizin 

*  QUICK-NAME  * 

AD  R  E  SSVE  R  WALTU  NG 
3400  Personen  verwaltbar 
Adresskopf  für  LOCOSCRIPT 
und  demnächst 

*  QUICK  DATA  3.0  GSX  * 

mit 

Kunden-  u  Artikelstamm,  Datenbank, 
Statistik  der  Umsätze  (GSX) 
Rechnung,  Auftrag,  Postkarten 
Aufkleber  f.  Nachnahme,  Adressen 
und  vieles  mehr... 

512  KB  RAM  arlordirllchlll 

BROSCHÜRE  SOFORT  ANFORDERN 

QUICK-CALC  2.0  : 148.00  DM 

QUICK-BILL  2.0  :168.00  DM 

QUICK-NAME  2.0  :128.00  DM 

QUICK-CINE  2.0  :  98.00  DM 

QUICK-DATA  3.0  : 228.00  DM 

*'*  EINFUHRUNGSANGEBOT  *** 


DYNAMIC  RANDOM-ACCESS  MEMORIES 
dir  JOYCE  512  KBRAM-FLQPPY 

KIT  PCW  8256/TMS  :  99.00  DM 

FA:  WERDER/Bramfelder  Ch.  215 
2000  Hamburg  71 /Tel.:  641  17  79 


SFK  SltKTRO  GMBH 

DClSTCHNfR  STHASSS  23 
3800  HAOCM 
V  02331/72008 


NEU  NEU  NEU 

Computer  24  Monate  mieten,  statt  kauten. 


Jetzt  kanten,  und  In  B  Moneten  bezahlen. 

Schneider  Joyce  Mietpreis  78,- 

Kaufpreis  1699,- 

Schneider  Joyce  Mietpreis  117,- 

Plus 

Kaufpreis  2444,- 

SchneiderCPC  Mietpreis  44,- 

61 28  (grün) 

Kaufpreis  999,- 

Schneider  CPC  Mietpreis  78,- 

61 28  (color) 

Kaufpreis  1699,- 

Scbneider  Mietpreis  24,- 

Diskettenlaufw 

ODM.FD1  Kaufpreis  498,- 

Schneider  Drucker  Mietpreis  29,- 

DMP  2000 

Kaufpreis  698,- 

Typenraddrucker  Mietpreis  63,- 

TRD  7020 

Kaufpreis  1  298,- 


Selbstverständlich  sind  auch  alle  anderen 
Schneider-Geräte  zu  mieten 
RAM-Erweiterung  für  Joyce 
auf  51 2  KB  119,- 

Akustikkoppler  mit  Terminal  30S. 
Komplettpreis  Cass  /Disk.  425,- 
Joystick  Competition  pro 
(mit  Mikroschalter)  45,- 

Ständig  die  neuesten  Spiele  und  Anwender¬ 
programme  für  die  Schneider  CPC  lieferbar 
Viele  Sonderangebote 
Katalog  gegen  Rückporto  (1-  DM  in  Brief¬ 
marken). 

Sämtliche  Lieferungen  erfolgen  zzgi.  Porto 
+  Verpackung 

Neu  eingetroffen:  Spiele  Lu  den  Joyce 


Briefe . 

Context-Copy 

Nachdem  mir  das  Abtippen 
des  Progra  mmhit  des  Monats 
” CONTEXT ’  doch  zu  müh¬ 
selig  wurde,  habe  ich  mich 
Ihres  Databox-Angebots  be¬ 
dient.  Vielen  Dank  übrigens 

-  prompter  Service. 
Dummerweise  hab  ich  zum 
Bestellzeitpunkt  noch  nicht 
gewußt,  daß  ich  mir  doch 
eine  DDI-1  Floppy  zulege. 
Und  da  ist  mein  Problem. 
Wie  bekomme  ich  die 
Cassetten-  Version  auf  Dis¬ 
kette.  Ob  ich  nun  Contextl. 
und  Context.Bin  oder  Con- 
text.Bin  und  Context  oder 
sonstige  Kombinationen  von 
Tape  aufDisc  nehme,  nach 
Einladen  von  Diskette  wird 
mir  die  Zeile  100  des  Haupt¬ 
programms  immer  als  "Im¬ 
proper  argument”  gemeldet. 

Rainer  W.  Schulz 
Wilhelmshaven 

CPCt 

ITAPE.IN  [Enter] 

Memory  &  92FF  [Enter] 
Load”Context.Bin”  [Enter] 
Save  ”Context.Bin,B,&9300, 
&D00  [Enter] 

...  und  schon  ist  Context 
auf  Disk! 

Hand  und  Fuß 

-  sehr  interessant 

Da  es  mittlerweile  auf  dem 
Meßgerätemarkt  einige  hun¬ 
dert  Meßgeräte  gibt,  die 
über  den  genormten  IEC- 
Bus-Anschluß  verfügen,  wür¬ 
de  ich  es  für  sinnvoll  halten, 
wen  n  im  Rahmen  Ihrer  Hard¬ 
wareserie  ein  entsprechen¬ 
des  Interface  einschließlich 
der  zugehörigen  Treiber¬ 
software  vorgestellt  würde. 
Damit  könnte  sich  den 
CPCs  mancher  meß-  und 
steuerungstechnische  Ein¬ 
satz  eröffnen. 

Da  ich  selbst  solche  Anwen¬ 
dungen  hätte,  würde  ich 
mich  freuen,  wenn  Sie  mir 
mitteilen,  ob  mit  solcher 
Hard-  und  Software  zu  rech¬ 
nen  ist. 

Erich  Kopp 
St.  Georgen 

CPC: 

Die  Veröffentlichung  einer 
I EC- Karte  ist  für  den  weite¬ 
ren  Verlauf  der  SCHNEI¬ 


DERWARE  geplant.  Vor¬ 
läufig  sollen  allerdings  erst 
einige  Grundkarten  ange- 
boten  werden. 


Hand  und  Fuß 

Ich  begrüße  Ihren  Ent¬ 
schluß  zur  Einführung  einer 
Hardware-Serie,  da  ich 
mich  bisher  nicht  dazu  ent¬ 
schließen  konnte,  die  im 
Handel  zu  hohen  Preisen 
angebotenen  Peripheriege¬ 
räte  zu  kaufen. 

Zum  Aufbau  der  Serie 
möchte  ich  Sie  bitten,  keine 
von  Computern  gezeichne¬ 
ten  Schaltpläne  zu  veröf¬ 
fentlichen  (abschreckendes 
Beispiel  auf  S.  72  im  Mai- 
Heft),  jeweils  ein  Foto  des 
Fertiggerätes  abzubilden  und 
zu  jedem  Gerät  eine  Bautei¬ 
leliste  abzudrucken. 

Zur  Software,  die  für  die 
einzelnen  Bausätze  nötig  ist, 
möchte  ich  Sie  bitten,  die 
Möglichkeit  offenzuhalten, 
daß  der  Anwender  die  Bild¬ 
schirmausgabe  selbst  gestal¬ 
ten  kann,  d.h.  diesen  Pro¬ 
grammteil  in  BASIC  zu 
schreiben. 

Jürgen  Münch 
Triefenstein 

CPC: 

Zum  Thema  Schaltplan 
sind  wir  noch  auf  der  Suche 
nach  einer  geeigneten  Lö¬ 
sung.  Die  Software  zu  den 
Bauanleitungen  wird  na¬ 
türlich  universell  gestaltet, 
daß  jeder  Anwender  zufrie¬ 
dengestellt  wird. 

Unbekanntes 

Zeichen 

Ich  besitze  seit  September 
1985  einen  Schneider  CPC 
464  Computer,  und  wende 
mich  heute  mit  folgendem 
Problem  an  Sie.  In  mehre¬ 
ren  Programmlistings  ver¬ 
wenden  Sie  das  Zeichen 
chr$(160).  So  auch  in  Ihrer 
Ausgabe  Sonderheft  1/86 
bei  dem  Programm  "Wall¬ 
street”  in  Zeile  770  und  780. 
Ich  möchte  nun  wissen,  wie 
ich  dieses  Zeichen  über  die 
Tastatur  eingeben  kann  und 
welche  Bedeutung  es  hat? 
Ich  habe  sogar  versucht,  das 
Zeichen  über  eine  Sonderta¬ 
stenbelegung  einzugeben. 


uni . . . . . . . in . im 

beim  anschließenden  Listen 
war  das  Zeichenjedoch  weg. 
Vielleicht  können  Sie  mir 
sagen,  woran  das  liegt? 

Michael  Suntrup 
Nordhorn 

CPC: 

Das  kleine  Dach  ist  das 
Potenzierungszeichen  des 
Lokomotive-Basics.  Sie  er¬ 
reichen  es  über  die  Pfund/ 
Pfeil-Taste  in  der  oberen 
Reihe  der  Tastatur. 

Fehler  suchen  und 
finden 

Das  Programm  "Suchen 
undFinden ",  ausHeft3/86, 
enthält  in  den  Zeilen  300 
und  390  einen  Druckfehler: 
Zeile  300  muß  heißen: 

300  PZ%(I)=LEFT%(PZ% 
(I),SP-1)+ERS$PMID$/PZ 
S (l),  SPP  LA) 

und  Zeile  390  muß  heißen: 
390  FOR  1=0  TO  K: 

PRINT #  9,  PZ%(I):NEX  T 

Hans  Schweriner 
Jülich 

Programm  gerettet 

Üblicherweise  ist  ein  Pro¬ 
gramm  verloren,  wenn  die 
Meldung  ” Read  Error.B” 
erscheint  und  trotz  mehrfa¬ 
chem  Hin-  und  Herspulen 
des  Bands  die  Programm¬ 
aufnahme  nicht  funktio¬ 
niert. 

Ziemlich  einfach  läßt  sich 
das  Programm  trotzdem  ret¬ 
ten,  wenn  man  dafür  zwei 
normale  Tonbandgeräte  ein¬ 
setzt  und  das  Programm 
ganz  normal  so  überträgt, 
wie  sonst  ein  Musikstück. 
Man  kann  also  seine  Stereo¬ 
anlage  zusammen  mit 
einem  einfachen  Tonband¬ 
gerät,  über  das  Radio  ge¬ 
koppelt,  einsetzen.  Das 
Programm  wird  nun  einfach 
überspielt  und  siehe  da,  bei 
der  Neuaufnahme  ist  der 
Fehler  "Read  error  b"  ver¬ 
schwunden.  Meistens  klappt 
das  sofort,  ansonsten  noch 
einmal  wiederholen. 

Ich  hoffe,  daß  dieser  Tip  so 
manchem  User  behilflich 
sein  kann. 

Henry  Dähn 
Bad  Harzburg  1 
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Super  Saturn 

Im  o.g.  Listing  aus  Sonder¬ 
heft  1  sind  einige  -  wenn  auch 
unbedeutende  -  Fehler  ent¬ 
halten.  Der  Autor  hat  sich  je¬ 
doch  so  viel  Mühe  damit  ge¬ 
geben,  einen  möglichst  "na¬ 
turgetreuen”  Sound  beim 
Ablauf  des  Spiels  zu  erzeu¬ 
gen,  dqß  es  einfach  zu  schade 
ist,  diesen  wegen  einiger 
Flüchtigkeitsfehlerzu  unter¬ 
schlagen. 

Will  man  auch  akustisch  in 
den  vollen  Genuß  des  Spieles 
kommen,  dann  müssen  fol¬ 
gende  Zeilen  geändert  wer¬ 
den: 

2080  GOSUB  3100 
2310  GOSUB  3150 
3110  FOR  n=4  TO  1 STEP-1 
Harry  Liedtke, 
Hückelhoven 

Zahl  in  String 

Ihre  Antwort  auf  den  Leser¬ 
brief m  it  dieser  Ü her schrift  in 
Heft  6/86  ist  nur  teilweise 
richtig,  ein  kleiner  Fehler  hat 
sich  eingeschlichen  Sie  schrei¬ 
ben: 

A=5:A$=STR$(A) 
und  schreiben  jetzt 
in  ,4$  steht  ”5”. 

Das  ist  falsch!  In  AS  steht  tat¬ 
sächlich  " CHRS(32)5 !! 

Es  ist  zwar  richtig,  daß  mit 


Bildschirm-Echo  läßt  sich 
auch  ein  wenig  einfacher  ge¬ 
stalten: 

100  PRINT’LOGON 
PLEASE ...  CALL 
&BB57  ’Bildschirm- 
Echo  aus 

110  INPUT"  ”,password$ 
120 IF  password%=  ” XYZ ” 
THEN 130  ELSE  100 
130  CALL  &BB54  Bild¬ 
schirm-Echo  wieder 
einschalten 

140  ' Programm  ausführen  ... 

Andreas  Dippe, 
Neunkirchen 


Text  von  Floppy 

Wieder  durften  wir,  die  CPC 
International-Leser,  ein 
wunderbares  Programm  bzw. 
Erweiterung  zum  bestehen¬ 
den  CONTEXT-Programm, 
aus  Ihrem  Heft  (5/86)  ent¬ 
nehmen.  Als  ich  die  gelunge¬ 
ne  Erweiterung  auf  dem  Bild¬ 
schirm  sah,  fiel  mir  sofort 
das  Suchen  beim  Laden  von 
Texten  auf.  So  dachte  ich  mir, 
könnte  man  die  Erweiterung 
auch  zum  Laden  der  Texte 
benutzen,  um  den  gesuchten 
Text  direkt  vom  Bildschirm 
übernehmen  zu  können.  Die 
neue  Variable  la  rem.y  be¬ 
kommt  durch  das  Unterpro¬ 


Zeile  920  erweitern: 

920 for  i—l  to  2000:next: 
window  swap  0,1:  ifla=l 
then  la=ö:gotü  185 
eise  1000 

Jedoch  fiel  mir  bei  der  cat- 
Routine  auf  daß,  wenn  die 
Diskette  volle  64  Eintragun¬ 
gen  hat,  das  Window  über¬ 
schrieben  wird.  Falls  ein 
User  dazu  eine  Lösung  hat, 
bitte  ich  ihn,  diese  Ihrer  Zeit¬ 
schrift  mitzuteilen,  damit  alle 
User  ihre  Programme  ver¬ 
bessern  können. 

Peter  Wiesemann, 
Haan 

Hardcopy  auf  dem 
Star  SG  10 

Herr  Altfeld  hat  uns  mit  sei¬ 
ner  Dl  N-A  4-Hardcopy  ( CPC 
5/86,  S.  80)  aus  der  Patsche 
geholfen,  ohne  es  zu  wissen. 

Alle  Hardcopy-Programme, 
die  wir  bisher  auf  unserem 
Star  SG  10  drucken  lassen 
wollten,  scheiterten  am  fal¬ 
schen  (zu  großen)  Zeilenvor¬ 
schub.  Eine  winzige  Ände¬ 
rung  in  Herrn  Altfelds 
” Supercopy  ”  brachte  nun  die 
Lösung: 

630 DATA  C8,9C,3E,08, 
CD,  C0,9C,3E,  1049 


10  A=5 

11  A*=STR$(A):  REM  ***  RICHTIGE  ZEILE  11  A3s=MID$ (STR* ( A) , 2)  *** 

12  PRINT  LEN ( A$ ) 

13  AA$=,,5" 

14  PRINT  LEN(AA$>  Listing  1 

15  PRINT  “1.  STELLE  VON  A$  IST  CHR$  ( '• ; 

16  PRINT  ASC (LEFT$ ( A$, 1 ) ) ; " ) “ 

17  IF  AA*=A$  THEN  PRINT  “GUT" : GOTO  19 

IS  PRINT  “SCHLECHT,  DA  TEXTINHALTE  VON  A$  UND  AAS  NICHT  GLEICH" 
19  END 


STRS  Zahlen  in  Strings  um¬ 
gewandelt  werden,  aber  in 
dem  Moment,  in  dem  Sie  ei¬ 
nen  Vergleich  anstellen,  er¬ 
halten  Sie  eine  negative  Ant¬ 
wort!  Siehe  Listing  1 
Richtig  wäre  folgende  Um¬ 
wandlung  =  A%=MID% 
(STR%(A),2) 

Ändern  Sie  dazu  Zeile  11  in 
Listing  1. 

Bernd  Uhlmann, 
Aachen 

Logon  Pleasel 

Die  in  der  Juni- Ausgabe 
Ihrer  Zeitschrift  angespro¬ 
chene  Kennwort-Angabe  ohne 


gramm  ab  Zeile  541  einen 

neuen  Wert 

neue  Programmzeilen: 

Die  Zeile  559  wird  erweitert: 
559  if  Ia=l  then  return  eise 
window  swap  0, 1 

625  if  y=6  then  la=l:gosub 
541 

820  ifla=l  then  880 

Die  alte  Zeile  820  wird  825 
825  if  y= 10  then  940 

Zeile  900  ändern: 
PÖO//la=l  then  call  cltxt, 
zadr,az*80:call  casin, 
zadr.az,  §«a$ 


Die  Änderung  &08  (dez.  8) 
anstatt  &0C  (dez.  12)  ergibt 
den  Zeilenvorschub  8/144, 
also  4/72  (Drucker-Befehl 
ESC  ”3"  8). 

Na  klar  -  die  von  dem  Pro¬ 
gramm  erzeugte  Druckzeile 
ist  eben  vier  Punkte  hoch! 
Mit  der  Änderung  dieses 
Drucker-Befehls  müßte  es 
übrigens  auch  gelingen,  an¬ 
deren  Hardcopy-Versionen 
auf  dem  Star-Drucker  Beine 
zu  machen. 

Thomas  Lipka, 
Christoph  Lipka, 
Martin  Lipka, 
Plettenberg 


THE  MIRAGE  IMAGER 

Für  CPC  464-664-6128 

Nur  Steckmodul  mit  durchgeführten  Port, 
keine  weitere  Software.  Einfachste  Hand¬ 
habung,  umfangreiche  Menuesteuerung, 
kopiert  auf  Disk  o.  Tape  per  Knopfdruck. 
Einfrieren  von  Spielen,  abspeichern,  später 
weiterspielen!  Intern  8K  Rom  und  8K  Ram. 
Geringer  Platzbedarf  -  komprimiert  Spiele 
auf  Disk  o.  Tape!  Tape-Save  fast  o.  slow. 
Ohne  Diskinterface  zu  verwenden  (464). 
Ist  nur  für  Software- Besitzer  zur  einfa¬ 
cheren  und  schnellem  Handhabung  ihrer 
Programme. 

Modul  und  Anleitung  DM  219,- 


Elite  (vorrätig)  Disk  69— 

ODI-1  Disklaufwerk  (m  Kontroller)  498  — 

CPC  464  mit  D  Dl- 1  Komplettpreis  998  — 
Logo  Cass  34  90 

Swords  &  Sorcery  Cass  2995/Disk  49  — 

Music  Maestro  Cass  34  90 

Zoids  Disk  49.90 

Fighter  Pilot  Cass.  32— /Disk  49— 

The  5th  Axis  Cass  39 — /Disk.  59. — 

Red  Arrows  Simulator  Disk.  49. — 

'V  an  all  out  attack  Cass  34  90 
Dataphon  S21 0  Akustikkoppler  248. — 


Gratisliste  anfordern  und  bestellen  bei: 

Elflktronlk  Center, 
WichterstraDe  3, 

8170  Bad  Tölz, 

Tel.:  08041/41565 

Lieferung  per  NN  (+ Porto)  oder 
V-Scheck  (Versandfrei!) 


RGB-Modulator 


(Art -Nr.  1150) 

Preis  DM  221,50 


Der  RGB-Modulator  ermöglicht  den  An¬ 
schluß  eines  Schneider  CPC  464,  CPC  664 
oder  CPC  61 28  direkt  über  AV  (Videoein¬ 
gang)  bzw.  VH  F  Antenneneingang  an  ein 
Fernsehgerät.  Der  RGB-Modulator  liefert 
außerdem  alle  Betriebsspannungen  für 
Rechner  und  Floppystation 


X-Schalter  (Art -Nr  1350) 

Preis  DM  312,50 

Der  X-Schalter  ermöglicht  das  Verschal¬ 
ten  von  zwei  Parallelausgängen  auf  zwei 
Paralleleingänge,  d.h.,  Sie  können  mit 
zwei  Rechnern  mit  parallelen  Schnittstellen 
zwei  Peripheriegeräte  betreiben,  die  Pa¬ 
ralleleingänge  besitzen 
Preise  incl.  MWSt 

Lieferung  per  Vorauskasse  /  Nachnahme 
zzgl  DM  7,-  Versand  u  Verpackung 
Bestellungen  an:  EDV-Partner 
Birkenwaldstr.  157,  7000  Stuttgart-1 
Artikel-Nr  Stück 
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Kurse 

Floppykurs 

Teil  2 

Im  ersten  Teil  unseres  Floppykurses 
haben  wir  uns  mit  dem  grundsätzlichen 
Aufbau  einer  Floppy-Hardware  ausein¬ 
andergesetzt. 

Warum  die  Hardware  so  und  nicht  an¬ 
ders  aufgebaut  sein  muß,  wird  Ihnen  al¬ 
lerdings  erst  klar,  wenn  Sie  etwas  über 
das  Grundprinzip  und  den  eigentlichen 
Aufbau  einer  Diskette  erfahren  ha¬ 
ben. 

1. Grundlegendes  über  Datensicherung 
(Magnetismus  und  seine  Folgen) 

Eine  magnetische  Datenaufzeich¬ 
nung  funktioniert  nach  dem  gleichen 
Prinzip,  mit  dem  Sie  eine  Audioauf- 
nahme  auf  Ihrem  Heimkassettenre- 
corder  vornehmen.  Auf  einem  Trä¬ 
germaterial  aufgebrachte,  stabför¬ 
mige  magnetische  Teilchen  werden 
beim  Bespielen  von  einem  Elektro¬ 
magneten  in  eine  bestimmte  Anord¬ 
nung  gebracht  (siehe  ABB.l). 

Beim  Wiederabspielen  erzeugen 
diese  Magnetteilchen  in  der  Spule  des 
Tonkopfes  eine  induktive  Spannung, 
die  von  der  Recorderelektronik  in 
akustische  Signale  (oder  Daten) 
umgesetzt  werden.  Deutlich  wird 
dies,  wenn  Sie  eine  Datenkassette  mit 
einem  normalen  Tape-Deck  anhören. 
Der  Datenträger  der  Diskette  besteht 
aus  dem  gleichen  Material  wie  eine 
Kassette,  und  auch  die  Daten  werden 
durch  einfaches  Aufnehmen  und 
Wiederabspielen  auf  die  Diskette 
bzw.  in  den  Rechner  gebracht. 

Bei  einer  Kassette  liegt  der  Nachteil 
im  mechanischen  Aufbau  der  Lese¬ 
vorrichtung.  Dadurch,  daß  das  Trä¬ 
germaterial  nur  in  einer  Richtung  am 
Ton  köpf  vorbeigeführt  werden  kann, 
kommt  man  um  ein  Umspulen  der 
Kassette  nicht  herum.  Einzelne  Stel¬ 
len  auf  einem  Band  wiederzufinden, 
ist  aufgrund  der  labilen  Zählwerks¬ 
mechanik  nahezu  unmöglich. 

Eine  Diskette  müssen  Sie  sich  nun  so 


vorstellen,  daß  das  Bandmaterial 
kreisförmig  um  die  Mittelachse  an¬ 
geordnet  ist.  Dadurch,  daß  die  Dis¬ 
kette  um  die  Mittelachse  rotiert  (siehe 
Teil  1),  sind  die  Entfernungen,  die  der 
Tonkopf  zurücklegen  muß,  um  etwas 
zu  finden,  schon  wesentlich  geringer. 
Zudem  rotiert  die  Diskette  wesentlich 
schneller,  als  sich  ein  Tape  dreht. 
Dies  bringt  Vorteile  in  Bezug  auf  Ge¬ 
schwindigkeit  und  Speicherkapazität. 
Damit  wäre  schon  einmal  erklärt, 
warum  sich  eine  Diskette  dreht. 
Bleibt  aber  immer  noch  die  Frage 
offen,  wieso  der  Tonkopf  auch  noch 
eine  vertikale  Bewegung  ausführen 
muß. 

Eine  Kassette  hat  ein  ungefähr0,5  cm 
breites  Band.  Durch  die  hohe  Ge¬ 
schwindigkeit,  mit  der  der  Datenträ¬ 
ger  der  Floppy  am  Tonkopf  vorbeige¬ 
führt  wird,  lassen  sich  auf  dünnere 
Magnetschichten  höhere  Datenmen¬ 
gen  bringen.  Warum  das  so  ist,  ist 
uninteressant.  Würde  das  Band  ge¬ 
nauso  schnell  am  Tonkopfvorbeilau- 
fen  wie  die  Floppy,  so  würde  ein  10 
mm  breites  Tape  vollständig  ausrei¬ 
chen.  Da  eine  Diskette  aber  einen 
Radius  von  2,5  cm  hat,  ließen  sich  auf 
ihr  40  Bandstücke  von  10  mm  Dicke 
unterbringen.  Alle  kreisförmig  um 
die  Mittelachse  angeordnet.  Beim 
Vortexformat  paßten  sogar  80  dieser 
Bandstücke  auf  eine  Diskette  (lo¬ 
gisch,  die  sind  ja  auch  größer).  Der 
Steppermotor  2  kann  den  Tonkopf 
(Schreib-/Lese-Kopf)  nun  in  40  Schrit¬ 
ten  ä  10  mm  vor-  oder  zurückbewe¬ 
gen,  und  ist  somit  in  der  Lage,  zwi¬ 
schen  den  einzelnen  Bandstücken 
hin  und  her  zu  wechseln.  Selbstver¬ 
ständlich  klebt  kein  Floppyhersteller 
Bandstücke  auf  seine  Datenträger. 
Die  Disketten  kommen  mit  einer 
magnetischen  Beschichtung  und  die 
Bandstücke,  die  wir  im  weiteren  jetzt 
SPUREN  (Tracks)  nennen,  müssen 
vom  Anwender  selbst  auf  die  Diskette 
FORMATIERT  werden. 

Soviel  zu  den  Prinzipien  der  magneti¬ 
schen  Aufzeichnung.  Alles,  was  über 
das  Gesagte  hinausgeht,  fällt  in  den 
Bereich  der  Grundlagenforschung 


und  ist  nicht  so  interessant.  Der  vor¬ 
hergehende  Absatz  endete  mit  dem 
schönen  Wort  FORMATIEREN  und 
bietet  uns  einen  idealen  Einstieg  in 
die  Architektur  der  Diskette. 

2.  Ordentlich  wie  ein  Regal 
(Sektoren  und  Tracks) 

Formatiert  werden  muß  jede  Disket¬ 
te,  bevor  man  sie  benutzen  kann.  Der 
Anwender  leitet  mit  dem  Formatie¬ 
ren  einen  wahnsinnig  komplizierten 
Vorgang  ein,  in  dem  die  einzelnen 
Spuren  vormagnetisiert  werden  und 
noch  eine  zusätzliche  Unterteilung  in 
9  Sektoren  pro  Spur  bekommen.  Je¬ 
der  dieser  Sektoren  kann  eine  Daten¬ 
menge  von  512  Byte  halten. 

Je  nachdem,  welches  Format  vom 
Anwender  gewählt  wurde,  werden  be¬ 
stimmte  Spuren  zur  Aufnahme  vom 
Floppy-internen  Routinen  reserviert. 
Den  Unterschied  zwischen  den  ein¬ 
zelnen  Formaten  erläutern  wir  zu 
einem  späteren  Zeitpunkt,  wenn  es 
wirklich  ans  Eingemachte  geht. 

Nach  dem  Formatieren,  welches  über 
ein  Programm  Ihrer  Masterdiskette 
vorgenommen  werden  kann,  befin¬ 
den  sich  auf  einer  Disketlenseite  auf 
jeden  Fall  40  Spuren  ä  9  Sektoren 
(beim  Vortexformat  80  Spuren  ä  9 
Sektoren). 

Um  nun  auf  der  Diskette  ein 
Programm  zu  finden,  welches  auf 
Spur  5,  Sektor  6  steht,  muß  der 
Schreib-/Lesekopf  zunächst  einmal  in 
die  Ausgangsstellung  Spur  0,  ScktorO 
gebracht  werden,  danach  der  Step¬ 
permotor  1,  die  Diskette  sechs  Schrit¬ 
te  um  die  Mittelachse  bewegen  und 
Steppermotor  2  fünf  Schritte  in  Rich¬ 
tung  auf  die  Mittelachse  fahren. 
Danach  befindet  sich  der  Schreib/ 
Lesekopf  genau  über  Spur  5,  Sektor  6 
und  kann  die  512  Bytes,  die  in  diesem 
Sektor  stehen,  lesen.  Trat  dabei  ein  Le¬ 
sefehler  auf,  so  rotiert  Stepper  1  die 
Diskette  erneut  neunmal  und  liest 
aufs  Neue.  Ist  der  Versuch,  diesen 
Sektor  zu  lesen  oder  zu  schreiben, 
fünfmal  schiefgegangen,  so  wird  eine 
Fehlermeldung  ausgegeben,  der  Mo- 
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tor  gestoppt  und  die  letzte  Position  im 
RAM  des  Rechners  zwischengespei¬ 
chert. 

Bei  der  nächsten  Order  zum  Positio¬ 
nieren  des  Kopfes  kann  sich  der  Rech¬ 
ner  das  Zurückfahren  auf  Spur  0, 
Sektor  0  ersparen  und  arbeitet  da 
weiter,  wo  er  aufgehört  hat. 

Auf  diese  Positionierungsvorgänge 
hat  der  Anwender  keinen  Einfluß. 
Der  Controller  betätigt  sich  hierbei 
als  Pfadfinder  und  weiß  von  vorn¬ 
herein,  wo  er  Daten  zu  suchen  hat. 
Ihre  Diskette  hat  nämlich  auch  noch 
ein  Inhaltsverzeichnis  (DIRECTO- 
RY/CATALOG).  in  dem  nicht  nur 
steht,  welche  Programme  auf  der 
Disk  enthalten  sind,  sondern  auch 
noch,  für  den  Anwender  nicht 
sichtbar,  wo  die  Daten  genau  zu  fin¬ 
den  sind. 

Die  Position  des  Directorys  auf  der 
Diskette  ist  abhängig  vom  Format. 

Wie  Sie  sehen,  hat  die  kleine  Disket¬ 
tenstation  ganz  schön  viel  zu  tun. 
Noch  komplizierter  verhält  es  sich 
heim  Vortex-Format.  Wenn  der 
Schreib-/Lesekopf  Spur  80,  Sektor  9 
erreicht  hat,  so  muß  er  auf  die  Disket¬ 
tenunterseite  umschalten  und  dort 
weitersuchen.  Aber  die  Grundlagen 
über  die  Hardware  sind  hiermit  abge¬ 


schlossen.  In  Abb.  2  sehen  Sie  noch 
einmal  den  Aufbau  einer  formatier¬ 
ten  Diskette  und  in  Abb.  3  alle  Bewe¬ 
gungen.  die  die  Steppermotoren  aus¬ 
führen  müssen. 


Im  nächsten  Teil  geht  es  dann  schon 
um  die  Programmierung  des  DOS 
und  die  Befehle,  die  es  dem  Anwen¬ 
der  auf  der  Ebene  einer  Hochsprache 
wüe  Basic  zur  Verfügung  stellt.  (TM) 


Joyce  &  CPC  als  Büromaschine 


PROFIREM 

die  ideale  Kombination 

Programmpaket  bestehend  aus: 

KUNDENDATEI  für  1000  Adressen  {CPC  400) 

mit  einer  praktischen  Eingabemaske:  Kundennum¬ 
mer,  Anrede,  Name,  Straße,  PLZ/Ort,  Bemerkung. 
Suchen  nach  frei  wählbarem  Indexfeld.  Ausdruck  von 
sortierten  Listen.  Einfache  Bedienung  durch  über¬ 
sichtlichen  Programmaufbau  sowie  durch  Hinweise 
am  Bildschirm. 

LAGERDATEI  für  1 000  Artikel  (CPC  400) 

mit  Artikelbestandskontrolle.  Einfaches  Verwalten  und 
Aktualisieren  der  Lagerdaten. 

FAKTURIERUNG  leistungsfähiges  Programm  für 
Rechnungen,  Angebote,  Lieferscheine  etc. 

Die  Adressen  und  Artikel  können  direkt  in  die  Rech¬ 
nung  eingelesen  werden.  Ein  einfacher  Briefkopf  kann 
erstellt  und  gespeichert  werden.  Rabatt  und  Mehr¬ 
wertsteuer  sind  variabel.  Speicherung  kompletter 
Rechnungen,  z.B.  für  spätere  Erinnerungen. 
Floskeltasten  für  häufig  benötigte  Wörter, 
und  vieles  mehr. 

PROFIREM  Programmpaket(Kunden,  Lager,  Faktu) 

3”-Dlskette  incl.  deutscher  Anleitung 

für  Joyce  nur  1 78,-  DM,  für  CPC  nur  1 36,-  DM 


FIBUKING 

Einfach  zu  benutzendes  Buchführungsprogramm 
auf  der  Basis  einer  doppelten  Buchführung. 
Besondere  Pluspunkte: 

-jederzeit  mögliche  Bilanzauswertung 

-  60  frei  wählbare  Konten 

-Ausdruck  von  Grundbuch  und  Kontenblatt 
-deutsche  Anleitung 

-  3”-Diskette  für  Joyce  oder  CPC  nur  1 36,-  DM 


CPC-Programme 

TEXTKING  die  moderne  Textverarbeitung  D98,-DIVI 
DATENREM  die  universelle  Datei  D  68,-  DM 
ETATGRAF  Haushaltsbuch  mit  Grafik  D  58,-  DM 
VOKABI  deruniverselle  Vokabeltrainer  D  58,-  DM 


Bestellungen  oder  weitere  Info  bei: 

TOS9  ©SIR  g&ILSsa 

Programm-Entwicklung  und  Vertrieb 
Elfriede  van  der  Zalm 
Schieferstätte,  2949  Wangerland  3 
Telefon:  0  44  61  /55  24 
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NLQ  -  Vertrieb 
eingestellt 

Wie  erst  kürzlich  bekannt 
wurde,  hat  Schneider  den 
Vertrieb  des  Matrixdruckers 
NLQ  401  sowie  des  Formu¬ 
lartraktors  SFT  401  einge¬ 
stellt. 

Das  Nachfolgemodell,  der 
DMP  2000,  ist  bereits  seit 
längerem  erfolgreich  eta¬ 
bliert  und  löst  den  NLQ  nun 
endgültig  ab. 

Info: 

Fachhandel  □ 

Quick-Data 

Die  Fa.  Werder  hat  ein  neues 
Programm  für  den  Joyce  an¬ 
gekündigt.  Quick-Data  soll 
die  Bereiche  Kunden¬ 
stammverwaltung,  A  rt  i  k  e  1  - 
stamm  sowie  Datenbank  ab¬ 
decken.  Das  Programm  ist 
vollständig  in  CP/M  3.0  ge¬ 
schrieben  (evtl,  auch  für 
6128?)  und  steuert  die  GSX- 
Schnittstelle  zur  Erzeugung 
von  Bildschirmgrafiken  an. 
Des  weiteren  gibt  es  zahlrei¬ 
che  Druckroutinen  für  Nach¬ 
nahmebelege,  Postkarten,  Eti¬ 
ketten  etc. 

Info: 

Fa.  Werder 

2000  Hamburg  71  □ 

Program  mier  bares 
RS-23  2-Kabel 

Lindy  bietet  jetzt  ein  pro¬ 
gram  m ierbares,  fü nfadriges 
Kabel  an.  mit  dem  viele  RS- 
2 3 2/ V . 24- Ve r b i n d u n ge n  zu 
lösen  sind.  In  jedem  Stecker 
sind  zehn  kleine  Schiebe- 
sch  alter  eingebaut:  insgesamt 
lassen  sieh  mehr  als  1  Mio. 
Schaltvarianten  rea  1  is iere n. 
Das  2  m  lange  Kabel  trägt 
beidseitig  die  genormten, 
25-poligen  Sub-D- Stecker 
und  eignet  sich  für  beinahe 
alle  RS-232/V.24-Verbindun- 
gen. 

Vertrieb:  Fachhandel  □ 


Festplatte  für  Joyce 

In  England  wurde  jetzt  die 
erste  Festplatte  für  den  Joyce 
PC  vorgestellt.  Die  soge¬ 
nannte  Amstore  hat  eine 
Speicherkapazität  von  20 
Megabyte;  der  Preis  stand 


allerdings  bei  Redaktions¬ 
schluß  noch  nicht  fest. 

Auf  Anfrage  erfuhren  wir, 
daß  zur  Zeit  erst  einmal  die 
Marktchancen  sorgfältig  ab- 
gewägt  werden,  bevor  das 
Produkt  in  größeren  Stück¬ 
zahlen  hergestellt  wird. 
Info:  Northern  Computers 
Ltd. 

Cheshire,  WA6  6  RD 
Tel:(GB)  0928/35700  □ 

Monitore 

entspiegeln 

Als  Alternative  zu  diversen 
Bi  1  d  sc  h  i  r  m  fi  1 1  e  rn  gi  b  t  es  n  u  n 
ein  Spray,  das  den  Monitor 
eines  Computers  entspiegeln 
soll.  Das  "anti-reflecf'-Spray 
wird  einfach  auf  den  Bild¬ 
schirm  aufgetragen;  dieser 
kann  nach  der  Beschichtung 
mit  allen  üblichen  Reini¬ 
gungsmitteln  behandelt  wer¬ 
den. 

Der  Preis  für  eine  Dose 
"anti-reflecf’-Spray  liegt  bei 
ca.  DM  29.90. 

Info:  resco  electronic 
8900  Augsburg  □ 

Prolog 
für  CP/M  2.2 

Das  Thema  "Künstliche  In¬ 
telligenz"  erfreut  sieh  regen 
Intel esses.  Die  Ptograin- 
mierung  dieser  komplexen 
Thematik  w  ird  vor  allem  in 
den  Sprachen  LISP  und 
Prolog \ orgenommen.  Nu n 
gibt  es  die  "micro-Prolog"- 
Version  für  CP/M  2.2-Rech- 
nef,  somit  können  auch  CPC 
464-  und  664-Besitzer  in  den 
Genuß  dieser  recht  unbe¬ 
kannten  P  rogra  m  m  ie  rs  p  ra- 
che  kommen. 

Info:  Fa.  Brainware 
6100  Wiesbaden  □ 


The  Music-System 

Rainbird,  die  Tochterfirma 
von  Firebird.  hat  das  Fol¬ 
geprodukt  ihre  Debüt-Hits 
"The  Music-System"  ange¬ 
kündigt.  Das  Disketten¬ 
orientierte  "Advanced  Mu¬ 
sic-System"  (AMS)  soll 
zwei  weitere  Module  ent¬ 
halten:  Eine  Option  zum 
Partitur-Ausdruck  von  No¬ 


ten  und  Texten  sowie  einen 
Linker,  um  editierte  Files 
zu  verbinden.  Die  User 
vom  "Music-System"  kön¬ 
nen  ihr  Paket  aufwerten,  in 
dem  sie  es  ohne  Verpa¬ 
ckung  mit  10  Pfund  zurück¬ 
senden. 

Info: 

Rainbird  Software 
Wellington  House 
Upper  St.Martin's 
Lane,  London  WC2H  9DL. 

n 


GSX-Literatur 

Endlich  gibt  es  Literatur  zu 
der  geheimnisvollen  GSX- 
Sehnittstelle  von  C  P/M  3.0., 
was  vor  allem  die  Anwen¬ 
der  von  CPC  6128  und 
Joyce  freuen  dürfte. 

Die  englischsprachige  GSX- 
Literatur  von  Digital  Re¬ 
search  besteht  aus  dem 
GSX-80  User  Guido  (Be¬ 
nutzerhandbuch)  und  dem 
G S X- P  rogra  m  m e  r's  G  u  i d e 
( P  rogra  m  m  i  e  r  h  a  n  d  b  u  c  h ) . 
Das  Paket  hat  einen  Preis 
von  ca.  DM  148.-  und  ist  bei 
allen  S  c  h  n  e  i  d  e  r-  V  e  r  1 1 '  a  g  s  - 
händlern  erhältlich. 

Info: 

Schneider  Data 

8050  Freising  □ 


Joyce-Schulung 

Die  Möglichkeiten  von  Lo- 
coScript  auszunutzen,  ist 
Ziel  der  Joyce-Schulung 
von  IC.  im  Berliner  Stadt¬ 
teil  Neukölln.  Die  indivi¬ 
duell  gestalteten  Kurse  fin¬ 
den  in  der  Zeit  von  19-22 
Uhr  statt,  die  Kosten  belau¬ 
fen  sich  auf  ca.  DM  228.-. 
Die  Veranstalter  machen 
darauf  aufmerksam,  daß 
der  Kurs  solange  dauert,  bis 
das  Lernziel  erreicht  ist. 
Info: 

Fa.  Ihre  Computerei 
1000  Berlin  44  □ 


Elektronik-  und 
Computertage  Saar 

Vom  5.  -  7.  September  fin¬ 
den  in  der,  Kongreßhalle 
Saarbrücken  die  3.  Elek¬ 


tronik-  und  Computertage 
Saar  als  Verkaufs-  und  In¬ 
formationsmesse  statt. 
Nachdem  im  vergangenen 
Jahr  fast  120  ausstellende 
Firmen  teilnahmen  und 
fast  9000  Besucher  gezählt 
wurden,  kann  dieses  Jahr 
das  Ergebnis  noch  verbes¬ 
sert  werden. 

Neben  den  kommerziellen 
Rechnern  findet  der  Inter¬ 
essent  auch  eine  große  Aus¬ 
wahl  an  Zubehör  und  Fach¬ 
literatur. 

Begleitet  wird  diese  Aus¬ 
stellung  durch  zahlreiche 
Vorträge  und  Demonstra¬ 
tionen. 

Info: 

Elektronik-  und 
Computertage  Saar 
6620  Völklingen  □ 


I  O-Fingersystem 

Jetzt  gibt  es  ein  Lehrbuch 
und  eine  Programmdisket¬ 
te  /u  i  sicheren  Beherr¬ 
schung  der  Tastatur  im 
Zehnfingersystem.  Fs  wer¬ 
den  Texte  vorgegeben,  kor¬ 
rigiert  und  aus  ge  wo  1 1  e  t . 

Das  begleitende  Lehrbuch 
zeigt  anhand  vieler  Bei¬ 
spiele  und  Übungsaufga¬ 
ben  die  Technik  des  Ma¬ 
schinenschreibens.  Das  Pa¬ 
ket  ist  lür  CPC 664  und 6 128 
erhältlich,  der  Preis  liegt 
bei  ca.  DM  69 -. 

Info: 

Verlag  Monde 

7514  Eggenstein  □ 


Mirage  Imager 

Der  Mirage  Imager  für  alle 
CPC  s  ist  ein  Hardware- 
Zusatz  zum  Übertragen 
von  Programmen  von  Kas¬ 
sette  auf  Diskette  und  um¬ 
gekehrt.  Auf  einen  Knopf¬ 
druck  hin,  wird  das  lau¬ 
fende  Programm  eingefro¬ 
ren,  anschließend  erscheint 
das  Tran sfer-Menu e.  Der 
Mirage  Imager  wird  voraus¬ 
sichtlich  etwa  DM  249,- 
kosten. 

Info: 

Mirage  Mikrocomputers 
5400  Koblenz  16  □ 
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Präsentiert 


Sai  ist  eine  japanische  Kampfart,  bei  der 
die  Gegner  versuchen,  sich  mit  Stock¬ 
schlägen  in  ihren  Aktionen  zu  blockieren. 
Sie  können  mit  Ihrer  stockschwingenden, 
stockstechenden  und  stockschlagenden 
Figur  1 6  verschiedene  Kampfbewegungen 
ausführen! 

”Sai  Combat  ist  ohne  Zweifel  das  beste 
Kampfspiel,  das  ich  je  auf  dem  Spectrum 
gesehen  habe  ...  Ein  Spitzen-Produkt  aus 
dem  Hause  Mirrorsoft”.  -  Aktueller  Soft¬ 
ware  Markt 

Schneider  CPC  (Gebrauchsanweisung 
in  Deutsch).  Spectrum  48K 


Sie  beginnen  als  Flugschüler 
auf  der  Spitfire  und  müssen 
Ihre  Fähigkeiten  beweisen, 
bevor  Sie  sich  bewähren 
dürfen.  Sie  sammeln  Er¬ 
fahrungen  und  speichern 
Ihre  Flug-Logbücher  auf 


Das  Spiel  hat  drei  Stufen: 

Starts,  Flüge  und  Landungen,  die  Sie  mit  den  vielen 
komplizierten  Instrumenten  vertraut  machen.  Freie 
Flüge -Sie  steigern  Ihre  Manövrierfähigkeiten. 
Einsatzflüge  -  jetzt  wird  es  ernst. 

Schneider  CPC.  Spectrum  48K.  Commodore  64 
in  Kürze  für  MSX.  Atari,  ^-r- - __ 


Rushware 

An  der  Gümpgesbrücke  24 
4044  Kaarst  2 


Purneli  Book  Centre,  Paulton,  Bristol  BS18  5LQ 
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Die  vierte  Amstrad  Computer  Show, 
die  vom  13.  -  15.  Juni  1986  im  Londo¬ 
ner  Stadtteil  Hammersmith  stattfand, 
brach  alle  bisherigen  Rekorde.  Besu¬ 
cher  und  Aussteller  konnten  drei  tolle 
Computertage  im  Londoner  (Hotel) 
Novotel  erleben,  die  allerhand  an  Neu¬ 
heiten  zu  bieten  hatten. 


London  angetreten,  um  ihre  Pro¬ 
dukte  erstmals  der  breiten  Öffentlich¬ 
keit  zu  präsentieren. 


Joyce  der  Renner 

Überraschend  war  festzustellen,  daß 


auch  nicht  lange  auf  sich  warten.  Lei¬ 
der  ist  dem  nicht  so? 

Während  die  Produkte  für  die  CPC- 
Computer  fast  ausnahmslos  lind 
ohne  große  Zeitverzögerung  bei  uns 
in  den  Handel  kommen  -  die  land¬ 
läufige  Meinung,  daß  die  Engländer 
uns  ein  halbes  Jahr  voraus  sind, 
stimmt  schon  lange  nicht  mehr-  sieht 
die  Situation  bei  Joyce-Produkten 
doch  etwas  anders  aus. 

Die  vorgestellte  Software  -  einige  sehr 
gute  Datenbanken,  Finanzprogram¬ 
me  usw.  -  müssen  zunächst  komplett 
eingedeutscht  werden,  um  bei  uns 
überhaupt  eine  Anwendung  zu  fin¬ 
den. 

So  wurde  z.B.  ein  LocoScript-Syntax- 
Checker  vorgestellt,  der  die  Orthogra- 
phie  überprüft  und  vorhandene  Feh¬ 
ler  anzeigt  -  aber  wie  gesagt,  alles  in 
englischer  Sprache. 

Um  ein  solches  Programm  ins 
Deutsche  zu  übertragen,  gehen 
Wochen,  wenn  nicht  gar  Monate  ins 
Land,  und  während  dieser  Zeit 
herrscht  eben  Ebbe.  Es  sei  denn,  die 
deutschen  Softwarehersteller  neh¬ 
men  sich  eigener  Ideen  an  und  stellen 
ähnliches  auf  die  Beine. 


Vierte  Amstrad  Show  zeigt  neue  Wege 


Als  am  13.  Juni  die  Pforten  für  die 
Amstrad  Show  geöffnet  wurden, 
drängten  schon  zahlreiche  Besucher 
in  die  Ausstellungsräume.  Mit  70 
Ausstellern  war  dies  die  bisher  größte 
Amstrad  Show  in  England.  Gemeldet 
halten  sich  allerdings  weit  mehr  als 
hundert  Aussteller,  die  aber  aus 
Platzgründen  nicht  mehr  unterge¬ 
bracht  werden  konnten,  wie  uns  De- 
rek  Meakin  von  Database  Publication 
versicherte. 

Database  Publication,  Veranstalter 
zahlreicher  Computermessen,  ist 
auch  Herausgeber  der  englischen 
Zeitschriften  "Computing  with  the 
Amstrad"  und  neuerdings  auch  von 
"Amstrad  User”. 

Neuer  Rekord  war  auch  die  Ausstel¬ 
lungsfläche  von  etwa  3000  qm,  die 
sich  im  Gegensatz  zur  vergangenen 
Amstrad  Show  mehr  als  verdoppelt 
hat,  so  Derek  Meakin  weiter. 

Und  wie  zu  erfahren  war,  soll  die 
nächste  Show  im  Oktober  noch  mehr 
Fläche  und  dann  auch  vier  Ausstel¬ 
lungstage  bieten. 

England  schwelt  zur  Zeit  im  absolu¬ 
ten  Amstrad-Fieber;  kein  anderer 
Computer  hat  zur  Zeit  einen  so  ge¬ 
waltigen  Markt  an  Hard-  und 
Software  aufzuweisen. 

So  waren  allein  20  neue  Firmen  in 


der  PC W  8256  bzw.  8512  (hierzulande 
als  Joyce  bekannt)  der  Engländer 
liebster  Computer  zu  werden  scheint. 
So  werden  allein  in  England  zur  Zeit 
jeden  Monat  20000  Joyce  verkauft; 
der  Trend  ist  weiter  steigend. 
Vergleicht  man  nun  einmal  diese 
Zahlen  mit  den  Verkaufszahlen  hier¬ 
zulande,  lt.  Schneider  sind  ca.  30000 
Joyce  verkauft,  so  können  die  Händ¬ 
ler  nur  mit  verschämten  Blick  auf  die 
Insel  hinüberblicken. 

Versucht  man  die  Gründe  für  diese 
doch  sehr  unterschiedlichen  Verkaufs¬ 
zahlen  zu  erforschen,  so  fällt  sofort 
das  Verkaufsargument  ins  Auge. 
Während  der  Joyce  bei  uns  als  kom¬ 
paktes  und  preiswertes  Textsystem 
angepriesen  wird,  gilt  der  PCW  in  Eng¬ 
land  als  preisgünstiger  PC  mit  CP/M- 
Betriebssystem,  mit  dem  man  selbst¬ 
verständlich  auch  eine  gute  Textver¬ 
arbeitung  erhält. 

Diesem  Umstand  ist  es  auch  zu  ver¬ 
danken,  daß  momentan  eine  wahre 
Softwareflut  für  den  Joyce/PCW  im 
Anrollen  ist,  während  gute  Anwen¬ 
dersoftware  hierzulande  nur  schwer 
auszumachen  ist. 

Nun  gut,  könnte  man  meinen,  was 
jetzt  in  England  an  Hard-  und 
Software  angeboten  wird,  läßt  bei  uns 


Trend  zur  Anwendung 


England  gilt  ja  allseits  nicht  nur  als 
Mutterland  des  Fußballs,  sondern 
seit  der  Einführung  des  Sinclair  ZX 
80/81  -  der  erstmals  für  Otto-Nor¬ 
malverbraucher  erschwinglich  war  - 
auch  als  Mutterland  des  Heimcom¬ 
puters. 

Der  englischen  Mentalität  zufolge 
wurden  die  Heimcomputer  über 
Jahre  hinweg  vorrangig  zum  Spielen 
verwendet;  die  führenden  Software¬ 
hersteller  des  Genres  Computerspiel 
(z.B.  Ultimate,  Bubble  Bus,  Mikrogen 
etc.)  kommen  fast  ausnahmslos  aus 
England. 

Völlig  entgegengesetzt  verlief  dage¬ 
gen  die  Entwicklung  in  der  BRD;  von 
Beginn  an  waren  Anwenderprogram¬ 
me  gefragt,  das  Spiel  galt  und  gilt  al¬ 
lenfalls  als  gelungene  Abwechslung. 
Umso  überraschender  konnten  wir 
beim  Besuch  der  Amstrad  Show  fest¬ 
stellen,  daß  in  England  gerade  eine 
Umbruchphase  beginnt  und  sich  die¬ 
ser  Markt  zunehmend  der  sinnvollen 
Heim-  und  Business-Anwendung  an¬ 
nimmt. 

Dies  mag  mit  Sicherheit  auch  daran 
liegen,  daß  die  Amstrad  Computer 
schon  von  der  Konzeption  viele 
Einsatzbereiche  abdecken  können 
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Bericht 


Günstige  Zweitlaufwerke  für  die  CPC- 
Computer  gingen  weg  wie  warme  Semmeln. 
und  im  Zusammenspiel  mit  entspre¬ 
chender  Soft-  und  Hardware  zu  ech¬ 
ten  Allroundtalenten  herangereift 
sind. 

In  England  ist  alles  anders  -  diese 
Aussage  mag  man  aufgrund  der 
neuen  Begebenheiten  nicht  mehr  so 
leichtgläubig  hinnehmen. 

Auf  den  zweiten  Blick  könnte  man 
folgende  Feststellung  treffen:  In  Eng¬ 
land  ist  vieles  anders! 

Schon  beim  lockeren  Rundgang 
durch  die  Ausstellungsräume  fiel 
zwangsläufig  das  breit  gefächerte 
Publikum  auf«  und  -  man  höre  und 
staune  -  das  Thema  Frauen  und 
Computer  scheint  in  England  über¬ 
haupt  kein  Thema  zu  sein! 

Wie  selbstverständlich  begegnet  man 
Vertretern  des  weiblichen  Ge¬ 
schlechts  nicht  nur  als  Besucher,  son¬ 
dern  sieht  sich  auch  Frauen  als 
Standpersonal  sehr  oft  gegenüber. 
Dabei  ist  allerdings  zu  bemerken,  das 
diese  -  oftmals  sehr  hübschen  jungen 
Damen  -  nicht  nur  Poster  und  Sticker 
verteilen,  wie  das  bei  uns  von  Messen 
in  Hannover oderMünchen  hinläng¬ 
lich  bekannt  sein  dürfte. 

Vielmehr  begegnete  uns  in  London 
das  weibliche  Standpersonal  als 
kompetenter  Gesprächspartner  in  al¬ 
len  Fragen  des  Computergeschäfts; 
eine  sehr  wertvolle  Erfahrung  für  uns, 
die  sich  doch  sonst  eher  einer  Män¬ 
nerdomäne  gegenübersehen! 

Daraus  folgt  logischerweise  auch  die 
Tatsache,  daß  die  englischen  Frauen 
eine  gänzlich  andere  Beziehung  zu 
der  Computertechnik  besitzen,  als 
dies  bei  uns  der  Fall  ist.  So  waren 
unter  den  vielen  tau.send  Besuchern 
zahlreiche,  weibliche  Computerfans 
mit  entsprechendem  Fachwissen  ver¬ 
treten. 


Neue  Produkte 


Wie  bereits  erwähnt,  konnte  an  vielen 
Ständen  neue  Anwendersoftware  für 
den  Business-Bereich  begutachtet 
werden,  die  sich  hauptsächlich  in 
Form  von  Datenbanken,  Finanzpro¬ 
grammen  etc.  zusammensetzte.  Diese 
Programme  hier  im  einzelnen  zu  er¬ 
wähnen,  scheint  nicht  sinnvoll,  da 
zur  Zeit  keine  Distribution  in  der 


BRD  vorgesehen  ist  und  englisch¬ 
sprachige  Anwendersoftware  sowie¬ 
so  nur  schwer  an  den  Mann  zu  brin¬ 
gen  ist. 

Eine  Ausnahme  ist  lediglich  das 
schon  vom  Sinclair  Spectrum  be¬ 
kannte,  universell  einsetzbare  Da¬ 
teisystem  Masterfile  III.  Wie  wir  er¬ 
fahren  konnten,  ist  die  deutsche 
Version  schon  in  Arbeit  und  wird 
demnächst  auch  hierzulande  ver¬ 
trieben. 

Die  bisher  so  erfolgreich  vertriebene 
AMX-Maus  von  Advanced  Memory 
Systems  hat  Zuwachs  in  Form  von 
Software  bekommen. 

Zunächst  werden  die  Programme  Pa- 
gemaker  und  Magazine-Maker  auf 
den  Markt  kommen,  die  an  die  legen¬ 
dären  Print-Shop  und  News  Room 
des  C-64  angelehnt  sind. 

Damit  wird  es  möglich,  mit  dem  Ein¬ 
gabegerät  Maus  seine  eigene  Zeitung 
bzw.  einzelne  Zeitungsseiten  zusam¬ 
menzustellen. 

In  Kürze  wird  die  AMX-Maus  auch 
für  den  Joyce  PC  angeboten,  der 
damit  endlich  eine  komfortable  Be¬ 
nutzeroberfläche  erhält  und  um  eine 
weitere,  sinnvolle  Anwendung  er¬ 
gänzt  wird. 

Neue  Software  gibt  es  inzwischen 
auch  für  das  Grafiktablet  Grafpad  II, 
das  von  der  Fa.  Pizie  Data  vertrieben 
wird.  In  Kurzfassung  einige  Features 
der  neuen  Software: 

-  Druckertreiber  zum  Anpassen  an 
gängige  Drucker 

-  freie  Rasterwahl 

-  Hardcopy  in  2  Formaten  mit 
Grauraster 

-  komplett  in  Maschinensprache,  da¬ 
her  genauere  Stiftabfrage  u.v.m. 

Besitzer  des  Grafpad  II  können  die 


neue  Software  gegen  Aufpreis  bei 
Pizie  Data  ordern. 

Das  Grafiktablet  wird  ebenfalls  für 
den  Joyce  angeboten,  unterstützt  je¬ 
doch  die  reine  Vectorgrafik.  Der  vor¬ 
aussichtliche  Verkaufspreis  liegt  bei 
ca.  DM  550,-. 

Ebenfalls  an  den  Joyce  angepaßt  hat 
Electric  Studio  seinen  EL-Lightpen; 
die  Demos  waren  schon  sehr  beein¬ 
druckend.  Dieser  Lightpen  wird 
schon  bald  unseren  Handel  errei¬ 
chen,  die  deutsche  Bedienungsanlei¬ 
tung  steht  kurz  vor  der  Fertigstel¬ 
lung. 

Biggles  -  so  heißt  einer  der  er¬ 
folgreichsten  Filme,  die  zur  Zeit  in 
England’s  Kinos  zu  sehen  sind. 
Kaum  im  Filmtheater  -  schon  ist  das 
Computerspiel  zum  Film  fertigge¬ 
stellt.  Biggles  ist  ein  mehrteiliges 
Arcade/Strategiespiel;  eine  ausführli¬ 
che  Review  können  Sie  in  unserer 
nächsten  Ausgabe  nachlesen. 

Von  Hisoft  kommt  Turbo  Basic  -  ein 
Compiler,  der  Basicprogramme  in 
Maschinencode  übersetzt  und  die 
Ablaufgeschwindigkeit  bis  zu  80mal 
erhöht.  Leider  unterstützt  Turbo 
Basic  keine  Fließkommaarithmetik 
und  gilt  daher  in  der  Anwendung 
zumindest  als  eingeschränkt. 

Dieser  Basic  Compiler  wird  voraus¬ 
sichtlich,  wie  alle  anderen  Hisoft- 
Produkte  auch,  von  der  Fa.  Schneider 
vertrieben. 

Ein  weiteres,  sehr  interessantes  Soft¬ 
wareprodukt  entdeckten  wir  bei  Ti- 
matic  Systems,  die  bisher  vor  allem 
durch  ihre  Diskettenlaufwerke  be¬ 
kannt  waren. 

Das  Programm  Microdraft  ist  ein 
komfortables  CAD-Programm,  das 
unter  CP/M  3.0  läuft  und  somit  auch 


Soft-  und  Hardware-News  aus  England.  Der  Markt  um  die  Schneider/Amstrad  Computer 
wächst  ständig. 
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vom  Joyce  verarbeitet  werden  kann. 
Durch  eine  reichhaltige,  selbst  zu  be¬ 
stimmende  Symbolbibliothek  ist 
Microdraft  in  der  Lage,  auch  kom¬ 
plizierte  Schaltpläne  zu  erstellen  und 
ganze  Layouts  zu  erzeugen.  Ein  be¬ 
sonderer  Clou  dieses  Programmes 
dü  rfte  die  Möglichkeit  sein,  von  IBM- 
Computem  erstellte  CAD-Grafiken 
mit  dem  Schneider  bzw.  Joyce  weiter 
zu  verarbeiten.  Natürlich  hatte 
Timatic  auch  neue  Hardware  auf  La¬ 
ger.  Vorgestellt  wurde  u.a.  ein  Eprom- 
Programmiergerät  sowie  ein  Zweit¬ 
laufwerk  für  den  Joyce. 

Das  im  5  l/4”-Format  gehaltene  Lauf¬ 
werk  hat  eine  Kapazität  von  1MB  und 
kostet  ca.  210  engl.  Pfd.  (ca.  DM  700,-). 
Dazu  gibt  es  allerdings  noch  ein 
reichhaltiges  Software-Paket,  das  u.a. 
Turbo-Pascal,  dBasell  und  Newword 
enthält  und  damit  ein  interessantes 
Angebot  sein  dürfte. 


Zubehör  für  Joyce.  DerLightpen  von  Electric 
Studio  erfreute  sich  großer  Nachfrage. 


Joyce-Spiele 


Daß  auch  der  Joyce  zur  Abwechslung 
mal  mit  einem  guten  Computerspicl 
gefüttert  werden  möchte,  scheint 
recht  naheliegend.  Und  Englands 
Softwarehäuser  arbeiten  eifrig  an 
Joyce-Spielen,  die  den  Unterhal¬ 
tungsbereich  abdecken  sollen.  Das 
Schachprogramm  Colossus  4,  von 
CDS  Software,  wohl  eines  der  spiel- 
stärksten  überhaupt,  ist  bereits  ange¬ 
paßt.  In  einem  kurzen  Test  konnten 
wir  uns  von  der  extremen  Leistungs¬ 
fähigkeit  dieses  Programmes  über¬ 
zeugen.  Näheres  dazu  erfahren  Sie  in 
einer  unserer  nächsten  Ausgaben. 
Rainbird  und  Level  9  zeigten  die  er¬ 
sten  Grafikadventures  für  Joyce- 
Computer:  Time  and  Magik,  The  Ar- 
chers  und  Jewel  of  Darkness  werden 
im  Herbst  auch  bei  uns  erhältlich 
sein,  die  gezeigten  Grafiken  waren 
bereits  sehr  beeindruckend. 
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Vom  Midi-Interface 
bis  zur  Festplatte 

Die  Musikfreunde  unter  den  Schnei¬ 
der-Anwendern  können  sich  eben¬ 
falls  über  einige  neue  Produkte 
freuen.  Die  Fa.  Vanguard  Leisure 
stellte  den  Music  Maestro  vor,  der  für 
alle  CPC’s  erhältlich  ist.  Das  Paket 
beinhaltet  einen  Stereo-Verstärker, 
zwei  30W  Lautsprecher  und  natür¬ 
lich  die  entsprechende  Software.  Als 
Demo  mußte  Jean  Michel  Jarre’s 
Synthesizer-Hit  Oxygene  herhalten, 
der  in  äußerst  eindrucksvoller  Art 
und  Weise  fast  originalgetreu  wieder¬ 
gegeben  wurde. 

Endlich  wurde  auch  einmal  ein  kom¬ 
plettes  Midi-Interface  gezeigt,  mit 
dem  mehrere  Synthesizer  vom  Schnei¬ 
der-Computer  angesteuert  werden 
können.  Electromusic  Research,  kurz 
EMR,  hatte  dann  auch  die  erste 
Zusatz-Software  parat,  den  soge¬ 
nannten  Miditrack  Performer. 

Wie  uns  versprochen  wurde,  sollen 
wir  umgehend  ein  Testexemplar  er¬ 
halten,  das  wir  dann  selbstverständ¬ 
lich  ausführlich  testen  und  vorstel¬ 
len  werden. 

Erfahren  konnten  wir  dann  noch,  das 
EMR  schon  bald  eine  Joyce-Version 
publizieren  wird,  auch  hier  laufen  die 
Entwicklungen  auf  Hochtouren. 
Sind  Sie  Discjockey,  veranstalten  oft 
Partys  im  Hobbykeller  oder  gefallen 
Ihnen  die  Lichteffekte  Ihrer  Stamm- 
Diskothek  nicht,  dann  kann  Ihnen 
geholfen  werden. 

Denn  jetzt  gibt  es  die  computerge¬ 
steuerte  Lichtanlage  (allerdings  nur 
für  CPC  6128)  von  Kelitronic.  Mit 
diesem  System  können  bis  zu  96  Ka¬ 
näle  angesteuert  werden;  die  Software 
ist  entsprechend  umfangreich. 


Unseren  Informationen  zufolge  gibt 
es  zur  Zeit  drei  Diskotheken  in  Eng¬ 
land,  die  mit  diesem  System  in  Verbin¬ 
dung  mit  CPC  6128  ihre  gesamte 
Lichtanlage  steuern. 

Der  Begriff  Festplatte  kursiert  auch 
bei  uns  schon  des  längeren  in  der 
Branche  herum.  Northern  Compu¬ 
ters  stellte  nun  eine  20MB  Harddisc 
vor,  die  zum  Preis  von  ca.  1300  Pfd. 
angeboten  wird.  Dieser  Preis  bein¬ 
haltet  eine  vollwertige  Centronics- 
Schnittstelle,  einen  Printer  Spooler 
sowie  einen  Druckerpuffer. 

Spricht  man  über  Hardwareprodukte 
zum  CPC,  kommt  man  an  der  Peri¬ 
pherie  von  dk’tronics  nicht  vorbei. 
Zum  altbekannten  Lightpen  und 
Sprachsynthesizer  sind  nun  zwei 
Speichererweiterungen  (64k  und 
256k)  und  die  sogenannte  Silicon 
Disc  hinzugekommen. 

Wie  wir  erfahren  konnten,  sind  die 
beiden  Speichererweiterungen  voll 
kompatibel  zu  der  am  Markt  befind¬ 
lichen  Software,  mit  entsprechen¬ 
den  Erweiterungen  anderer  Her¬ 
steller  hat  man  in  England  keine 
allzu  guten  Erfahrungen  gemacht, 
wie  uns  von  seitens  Amsoft  versi¬ 
chert  wurde. 

Die  Silicon  Disc  von  dk'tronics  hat 
eine  Speicherkapazität  von  256  K  und 
ist  voll  kompatibel  zu  den  eben  ge¬ 
nannten  Speichererweiterungen. 
Diese  Silicon  Disk  ähnelt  vom  Äuße¬ 
ren  ebenfalls  den  Speichererweite¬ 
rungen,  bzw.  der  Box  des  Lightpens 
und  Sprachsynthesizers  und  ersetzt 
quasi  ein  Zweit-  oder  Drittlaufwerk. 
Voraussetzung  für  den  Betrieb  der 
Silicon  Disc  ist  allerdings  ein  norma¬ 
les  3”-Disklaufwerk;  die  im  ROM  ver¬ 
ankerte  Software  erkennt  automatisch 
den  entsprechenden  Status  (Lauf¬ 
werk  A;B;C).  Die  Silicon  Disc  ist  ver¬ 
gleichbar  mit  einer  RAM-Floppy;  der 


dgPIlMkP 
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-c,  w  } 

Die  AMX-Maus  bekommt  Nachu  uchs.  Neben  einem  Utility- Pack  kommen  Page- Maker  und 
M  agaz  i  n  e-Ma  ker. 
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Supersound  mit  dem  CPC. 

EMR  zeigte  ein  Midi- Interface  zum  A  nschluß 
an  Synthesizer. 


Speicherinhalt  ist  nach  dem  Aus¬ 
schüßen  des  Computers  also  ge¬ 
löscht. 

Einiges  Aufsehen  erregten  zwei 
kleine,  schwarze  Boxen,  die  einfach 
in  den  Expansion  Port  der  CPC- 
Computer  eingesteckt  werden.  Die 
Firmen  Romantic  Robot  (Multiface 
two  und  Mirage  (Mirage  imager) 
stellten  ein  Interface  vor.  mit  dem  auf 
Knopfdruck  jedes  beliebige  Programm 
"eingefroren"  und  auf  Kassette  oder 
Diskette  abgespeichert  werden  kann. 
Des  weiteren  kann  eine  genaue 
Programmanalyse  vorgenommen  wer¬ 
den;  über  zahlreiche  Menues  kann 
der  jeweilige  Status  abgefragt  und 
sogar  geändert  werden.  Eine  denkbar 
sinnvolle  Anwendung  wäre  zum  Bei¬ 
spiel  das  Ändern  der  Farben  von 
Spielfiguren  oder  Hintergründen, 
was  Besitzern  von  Grünmonitoren  in 
diesem  Fall  zugute  kommen  würde. 
Raubkopierer  mögen  hier  eine  echte 
Chance  wittern,  um  Programme  auf 
einfachste  Art  zu  "knacken"  und  ent¬ 
sprechendweiterzugeben.  Doch  ganz 
so  einfach  ist  das  nun  auch  wieder 
nicht.  Das  sogenannte  "Knacken" 
(z.B.  Ändern  des  Copyrightvermerks) 
geht  zw'ar  recht  schnell  und  einfach, 
hat  aber  zur  Folge,  daß  die  geänder¬ 
ten  Routinen  in  das  8k  umfassende 
RAM  des  Interface  geschrieben  wer¬ 
den.  Um  die  modifizierte  Software 
dann  aber  ablaufen  zu  lassen,  wird 
wiederum  das  entsprechende  Inter¬ 
face  benötigt  und  schon  ist  die 
Grenze  des  Mißbrauchs  erreicht. 


Daten  per  Telefon 


Betrachtet  man  einmal  die  vielfälti¬ 
gen  Möglichkeiten  der  Kommuni¬ 
kation  zwischen  Computern,  so  fal- 


Bericht 


len  sofort  die  Begriffe  DFÜ,  BTX  oder 
Datex-P. 

Der  englische  Postservice  Prestel,  ver¬ 
gleichbar  mit  unserem  BTX-Netz.  hat 
wohl  inzwischen  so  etwas  wie  eine 
Vormachtstellung  erreicht.  Heute 
schon  nutzt  fast  jeder  englische  Be¬ 
trieb,  ja  selbst  die  große  Masse  der 
Privatleute,  die  modernen  Kommu¬ 
nikationstechniken  in  Verbindung 
mit  einem  Heim-  oder  Personalcom¬ 
puter. 

Die  Vorteile  liegen  klar  auf  der  Hand, 
die  elektronische  Kommunikation 
geht  problemlos  vonstatten  und  wird 
in  England  zu  einem  sehr  günstigen 
Preis  angeboten. 

Schwierigkeiten  mit  der  Erteilung 
von  FTZ-Nummern  kennt  man  in 
England  nicht  und  überhaupt  scheint 
die  englische  Post  diese  Entwicklung 
in  keinster  Weise  zu  blockieren. 
Betrachtet  man  dagegen  die  Aktivitä¬ 
ten  der  deutschen  Bundespost,  kann 
man  fast  nur  noch  in  Hohngelächter 
ausbrechen.  Wieder  einmal  mehr  ist 
der  berühmt  berüchtigte  deutsche 
Bürokratismus  Vorläufer  einer  Gene¬ 
ration,  die  dem  Weltstandard  schon 
jetzt  ein  gutes  Stück  hinterherhinkt 
und  Gefahr  läuft,  den  so  wichtigen 
Anschluß  erneut  zu  verpassen. 

Den  bundesdeutschen  Postlern  wür¬ 
de  ein  Trip  nach  England  sehr  gut 
tun,  um  einmal  zu  sehen,  wie  ohne 
großen  Aufwand  eine  Datenkommu¬ 


nikation  der  breiten  Masse  zur  Verfü¬ 
gung  gestellt  werden  kann. 

Aber  noch  ist  ja  nicht  aller  Tage 
Abend  und  wer  weiß,  vielleicht  kom¬ 
men  auch  wir  einmal  in  den  Genuß 
dieser  gebührengünstigen  Kommu¬ 
nikation. 

Fazit: 

Die  Organisatoren  haben  eine  Super- 
Amstrad  Show  auf  die  Beine  gestellt, 
die  Publikum  und  Aussteller  aus¬ 
nahmslos  begeisterte.  Als  Herausge¬ 
ber  der  CPC  International  waren  wir 
hocherfreut  zu  vernehmen,  daß 
unsere  Zeitschrift  auch  in  England 
einen  sehr  guten  Ruf  hat  und  gern  ge¬ 
lesen  wird. 

Unsere  jüngsten  Aktivitäten,  Data- 
box-Service,  Hardware-Ecke  und  Gol¬ 
dene  7  finden  bereits  Nachahmer;  es 
wurde  weiterhin  eine  enge  und 
freundschaftliche  Zusammenarbeit 
mit  allen  Branchenvertretern  ver¬ 
einbart. 

Übrigens  wußten  Sie.  daß  Ihre  CPC 
International  mit  einer  Gesamtauf¬ 
lage  von  90000  pro  Monat  die  aufla¬ 
genstärkste  Schneider-Zeitschrift  der 
Welt  ist? 

Die  größte  englische  Zeitschrift, 
Computing  with  the  Amstrad,  kommt 
dagegen  nur  auf  etwa  70000  Auflage. 
Ein  starkes  Stück,  oder  wie  die  Eng¬ 
länder  sagen  würden;  "The  worlds 
biggest  independend  Computer  ma- 
gazine  for  amstrad  Computers".  (SR) 


Die  20MB  Festplatte  von  Northern  Computers.  Ein  Vertrieb  hierzulande  ist  noch  nicht  in  Sicht. 
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Hardware 
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Präzision  im 
Selbstbau 


um  die  guten  Daten  des  Gerätes  nicht 
durch  mangelhafte  Arbeit  zu  ver¬ 
schlechtern.  Ein  kritischer  Punkt 
hierbei  ist  die  korrekte  Ausrichtung 
der  Führungen  für  X-  und  Y-Achse, 
die  mit  Geduld  und  Sorgfalt  durch 
Einstellung  der  Linearkugellager 
vorgenommen  werden  muß.  Ein  ar¬ 
beitsreiches  Wochenende  sollte  aller¬ 
dings  ein  zufriedenstellendes  Er¬ 
gebnis  zur  Folge  haben. 

Bild  2  zeigt  schließlich  den  Lohn  der 
Mühe  -  ein  durchaus  ansprechendes 
Gerät,  welches  in  den  technischen 
Daten  den  Vergleich  mit  wesentlich 
teureren  Produkten  nicht  zu  scheuen 
braucht. 

Ein  möglicher  Pferdefuß  sei  hier 
nicht  verschwiegen:  Der  Anwender 
wird  vorläufig  die  Treiberroutine  für 
den  PL  22  selbst  schreiben  müssen. 
Softwarehersteller  sind  natürlich  ge¬ 
neigt,  die  in  ihren  CAD-  oder  Gra¬ 
fikprogrammen  enthaltenen  Plot¬ 
tertreiber  an  die  Produkte  großer  Her¬ 
steller  anzupassen,  um  dadurch  auch 


Bild  2:  ...  entsteht  ein  DIN  A  3-Plotter  im  Selbstbau 


Bild  1:  Mit  Geduld  und  handwerklichem  Geschick... 


größere  Verbreitung  ihrer  Program¬ 
me  zu  erreichen.  Das  Betriebssystem 
des  PL  22  allerdings  stellt  eine  große 
Fülle  von  komfortablen  Steuer-  und 
Kontrollbefehlen  zur  Verfügung,  die 
allesamt  durch  'PRINT  #  8'  ange¬ 
sprochen  werden  können,  so  daß 
auch  von  Basic  aus  ein  universelles 
Treiberprogramm  leicht  herzustellen 
ist. 


Die  technischen  Daten: 

Software: 

Betriebssystem  ’GRAPE  firm’  mit 

Vielen  Sonderroutinen  wie: 

-  Einstellung  der  Zeichengeschwin¬ 
digkeit 

-  Schrift  kann  in  Größe,  Neigung, 
Drehung  beliebig  verstellt  werden 

-  mehrere  Strichlierungsarten 

-  Interpolation  von  Kurven;  der  Digi¬ 
taleffekt  bei  Kreisen  entfällt 

-  beliebiger  stufenloser  Zoom 

-  automatische  Erstellung  von  3D- 
Grafiken 

-  Befehle  werden  per  ’LPRINT’  oder 
’PRINT  #8'  übergeben 

Hardware: 

DIN  A3-Plotter  mit  Z  80  Coprozessor 

-  Anschluß  per  Centronicsport 

-  Auflösung  0,0625  mm 

-  max.  Zeichengeschwindigkeit 
60mm/sec 

-  spielarme  Linearkugellager 

Preise: 


Mechanikbausatz 

Prozessorkarte 

Netzteilbaus. 

Gehäuse 

GRAPE  Software 


ca.  620  -  DM 
ca.  390  -  DM 
ca.  200,-  DM 
ca.  100  -  DM 
ca.  300,-  DM 


Komplettgerät  der  höchsten  Ausbau¬ 
stufe:  ca.  1575,-  DM 

Info:  Walter  Kopisch 
Plotter-  und  Grafiksysteme 
7712  Blumberg  (ME) 


CPC-Besitzer,  die  ihren  Rechner  zur 
Erstellung  technischer  Zeichnungen 
oder  hochwertiger  Grafiken  verwen¬ 
den,  wollen  ihre  Werke  natürlich 
auch  in  angemessener  Qualität  zu 
Papier  bringen.  Ein  Matrixdrucker 
stößt  dabei  schnell  an  seine  Grenzen. 
Die  Alternative  heißt  hier:  ein  Plotter. 
Dieser  jedoch  stößt  in  Preisbereiche 
vor,  die  leicht  das  Doppelte  des  An¬ 
schaffungspreises  für  den  Rechner 
ausmachen  können.  Seit  einiger  Zeit 
werden  allerdings  einige  Flachbett¬ 
plotter  in  ausreichender  Qualität 
auch  als  Bausätze  angeboten  -  und 
dies  zu  wahren  Dumpingpreisen. 
Einer  dieser  Plotter  ist  der  PL  22/B 
der  Firma  Kopisch.  Dieser  DIN-A3- 
Flachbettplotter  ist  sowohl  als  Bau¬ 
satz  als  auch  fertig  aufgebaut  erhält¬ 
lich.  Beide  Versionen  werden  mit 
einer  fertig  aufgebauten  Prozessor¬ 
karte  ausgeliefert,  die  die  Zeichen¬ 
maschine  mittels  komfortabler  Soft¬ 
ware  zu  einem  wahrlich  intelligenten 
Peripheriegerät  machen. 

Bild  1  bietet  dem  geneigten  Selbst¬ 
bauer  einen  ersten  Eindruck,  welche 
Erwartungen  ein  gelungener  Selbst¬ 
bau  an  seine  handwerklichen  Fä¬ 
higkeiten  stellt.  Die  benötigten  Ein¬ 
zelteile  waren  vollzählig  und  sorg¬ 
fältig  verpackt.  Dank  einer  recht 
ausführlichen  in  vier  Baugruppen 
unterteilten  Bauanleitung  war  der 
Zusammenbau  kein  Problem.  Die 
Teile  waren  paßgenau  und  ließen  kei¬ 
nen  Zweifel  an  ihrer  Zugehörigkeit. 
Allerdings  sei  an  dieser  Stelle  darauf 
hingewiesen,  daß  ein  Plotter  ein  Prä¬ 
zisionswerkzeug  darstellt  und  der 
Zusammenbau  doch  einige  Grund¬ 
kenntnisse  der  Mechanik  erfordert, 
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UIR  Sim  IHR  STARKER 

Schneider 

COHPUTER  Division 
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Software: 

Tuba  Huba 

C  39,— 

Worldcup  Carneval 

C/O  39-/59, — 

Soccer 

C/D  39.-/S9, — 

Shape  &  Sound 

0  59,— 

M8ldown 

C/O  29-/49, — 

Ooors  of  Doom 

0  59,— 

Thing  on  a  Spring 

C/O  29-/49, — 

Giass 

C  39  — 

Ciassrc  Invaders 

C/O  15-/35  — 

Grlhgans  Gold 

C  33,- 

Night  Gunner 

C/D  34-/54  — 

Speeky  Harold 

C  12.80 

C-Basic  Deila 

C  12.80 

_ 

> 

^oftwire: 

> 

Stairway  !o  Hell 

C/O  29-/49. — 

Frankie  goes  Io  Hollywood 

C  36  — 

Ping  Pong 

C/D  35-/49. — 

Colossus  Chess  4.0 

C/D  39-/59, — 

Spmdizzy 

C/O  39,-/59, — 

The  Graphik  Adventure  Creator 

C/O  79-/89. — 

Forbidden  Planet 

C/D  39-/59, — 

Eden  Biues=Doomsday  Blues 

C/D  39-/59, — 

Crafton  &  Xunx=Get  Oexier 

C/D  39-/59, — 

Way  ot  the  Tiger 

C/D  39-/59, — 

Souls  ol  Oarkon 

C  39,— 

Saboteur 

C/D  39.-Z59. — 

Samantas  Fox  Strip  Poker 

C/D  39-/59. — 

Winter  Games 

C/D  39-/59  — 

Hexenküche  II 

D  49  — 

Turbo  Espnt 

C/D  39-/59, — 

Fanlrght 

C/D  39-/59. — 

Tomahawk 

D  49,— 

Hacker 

C/D  36,-/59, — 

The  Music  System 

C/D  69-/79, — 

Theatre  Europe 

C/D  39,-/59, — 

Tau-Ceti 

C/O  39-/59, — 

Battle  ol  the  Planets 

39  — 

Working  Backwards 

D  59,— 

Rocky  Horror  Show 

C/D  29-/4  7.— 

Marsport 

C/D  39-/49  — 

Who  dares  wrns  II 

C/D  36-/59  — 

Grand  Prix  Rallye  II 

D  59— 

Cluedo 

39— 

Yie  are  Kung  Fu 

C/D  39-/59- 

Fryday  the  1 3th 

C/D  39-/69, — 

Zorro 

39,— 

Gyros  cope 

34,- 

Lords  of  Midnlght 

C/D  49-/59. — 

Lord  of  the  Rings 

C  59,— 

Sweevos  World 

C/D  29.-759. — 

The  Scout  Steps  out 

C/D  39-/59. — 

Death  Wake 

34  — 

Tornado  low  level 

C/O  39-/59. — 

fighting  Warnor/Exploding  Fist 

D  69  — 

Bombiack 

C  39  — 

The  Devil  s  Crown 

C/D  39-/59. — 

30  Cyrus  (Schach) 

C/O  39-/49, — 

30  Grand  Prix 

C/O  39-/49, — 

Super  Pipeline 

C/D  36-/56, — 

Codename  Mat  II 

C/D  29,-159,- 

Sorcery 

29,— 

Sorcery-F  (Disk  3") 

59  — 

Frank  Bruno  s  Boxing 

C/D  29-/49  — 

Spy  vs  Spy 

C/D  39  -749  — 

Elite 

D  79  — 

^pittire  40 

C/D  39-/49. — 

r 

\ 

Software: 

Kung-Fu-Master 

C/D  39.-759, — 

The  fith  Axis 

C/O  39-/59.- 

2112  AD 

C/D  39.-759  — 

Shadowtire 

C  35  — 

V  -  this  Is  if 

C/ü  39.-759. — 

N.0.MA.D. 

C  35  — 

Zords 

C/D  35-/59, — 

Pto|ecf  Future 

C  39  — 

Biggles 

C  39,- 

Equenox 

C/D  39-/59, — 

CORE 

C  39,— 

Arnheim 

C  39,— 

V 

Für  Joyce  PCW  8256/8512 
Proflrim  professionelles  Geschafissottware- 
Paket  mit  Lagerdatei.  Adressdatei.  Sotori- 
Speicherfakfurlerung, 

Preis:  171  —  DM 

Flbnklng  professionelle  Finanzbuchhaltung 

•  60  definierbare  Konten 

•  Bilanzauswertung 

•  einfache  Buchungseingabe 

•  Ausdruck  von  Kontenrahmen  +- 
Kontenblöcken 

Preis:  138.- DM 

Spezialprospekt  anfordem. 


Graffpad  II 

•  Auflösung:  1<?80 x t024  Bildpunkte 

•  Abweichung :  ±  1  Pixel 

•  Zeichenfläche .  DIN  A4 

•  hochauflösende  Graphik 

•  Schaltungsdiagramme 
■•CAD 

4  Abmessungen  350  x  260  x  12  mm 

•  Optionswahl 

•  Formeingabe 

•  Bilderspeicherung  und  Abruf 

•  Preis  für  464,  664  271,- 

•  Preis  für  6128  288.- 

•  Anschltißadapter  f.  464-3"  u.  6128  48,- 

•  mit  deutschem  Handbuch 

Fordern  Sie  kostenlosen  Prospekt  an ! 

Sie  werden  begeistert  sein  I 
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Hardware: 

3"  1 -Megabyte-Laufwerk  für  Joyce  698- 
Alle  Vartex-Erweiterungen  ab  Lager  lieferbar. 
Vortex-Diskettenlaufwerke: 

5  '/*"  Einfachlaufwerk  mit  708  KB  formatiert, 
aufrüstbar  zum  Doppellaufwerk  (548-  DM)  mit 
resistenten  Assembler,  Disassembler,  Monitor 
und  RSX-Befehlen.  Anlegen  von  Random- 
Dateien  unter  Basic. 

Fl -S  5 ’A"  Floppy  1198,- 

M1-S  3  W  Floppy  998,- 

F1-D  5  '/*"  Ooppellaufwerk  1698- 

M1-D  3  ’A"  Doppellaufwerk  1498- 

F1-X  5  %"  Zweitlaufwerk  708KB, 
ROM-Software  758- 

M 1  -X  wie  Fl -X,  jedoch  3  ’A"  758- 

Aufrüstkit  für  80  Spur  Doppellaufwerke 
als  X-Laufwerk  298 — 

Adapterkabel  zum  Anschluß  der 
Schneider- Floppy  an  F1-S  (M1-S) 
oder  Fl -D  (Ml -D)  als  2.  Laufwerk  58- 


AMX-Mouse 

Mit  Software  (Zeichenprogramm  + 
Basicerweiterung)  Ähnlich  wie  bei 
Macintosh  und  Atari  520  ST  für  CRC  464 
664  und  6128. 

Komplett 

mit  deutschem  Handbuch 


0M  278.— 


STAR-WRITER I  (464  /  664  /  6126) 


Textverarbeitung 

Grafikprogramm 

DIN-Tastatur 

Serien  briefe 

Blockoperationen 

Trennvorschläge 

Suchen  und  Ersetzen 


Adressverwaltung 
DFÜ-Programm 
PULL-DOWN  Menues 
Fließtexteingabe 
Block-  und  Flattersatz 
Bausteinverarbeitung 
Kopf-  und  Fußzeilen 


mit  ausführlichem  Handbuch  nur  1 90 ,• 


Händleranfragen  erwünscht 
Schulen  erhalten  Sonderkonditionen 


Potsdamer  Ring  10  -7150  Badrnang  ■  -8*07191/1528-29 


COnPUTER-ELEIiTROrilli 


Software  für  Joyce: 

LocoScnpt  (Kurzanleitung  m  Ubungsdisk)  29,50 
Prompt  iDaleivervealtiing  m  'Uslengeneralor)  69,— 
DR-DHAW  199.50 

DR-GRAPH  199.50 

Business- Pac*  lAdress-Uger-  und 
Faklurma  nagen  199,90 

Compuler-WOilmtiuch  (Englisch)  149.90 

3-G  Clock  Chess  (Schachprogianmi)  79.90 

MICA  198,- 

RH-DAf  (relative  Oateiverwaltuna)  89,— 

Tutbo-Adcess  (1400  Adressenl  169,— 

Voka&elirainef  69,— 

Verbentrainer  59, — 


Joyce: 

Bildschirmfilter 

89  — 

3"-0iskette  CF2-DD 

19,80 

Parallel-  u.  Seriellschnittsteile 

148. — 

Farbband 

24,80 

Für  Joyce  PCW  8256: 

Megabytelaufwerk 

698, — 

Aufrür  tkit  von  256KB  auf  5 1 2KB 

149. — 

DATEI-STAR 

98. — 

STAR-MAIL 

98. — 

FIBU-STAR+ 

298. — 

STAR-BASE 

198, — 

/ 

s 

Wlchllut  Zubehör: 

Abdeckhauben  aus  grauem  Kunstleder 

Konsole  464/664/6128 

19,80 

Floppy  DD1/FD1 

16,80 

Floppy  Vortex  FD-1 

19,80 

Monitor  grün 

26,80 

Monitor  color 

29,80 

Drucker 

19,80 

Drucker  (NLO/D  MP) 

19,80 

Oruckerkabel  464/664 

48,50 

Druckerkabel  6 128 

58,50 

Lightpen  für  CPC6128 

139,— 

Farbband  (black)  (ür  Okimate  20 

14,— 

Farbband  (colour)  für  Okimate  20 

17,— 

Schneider  Joystick 

39,50 

Disketten  3" 

ä  12  — 

Disketten  DS/DD  5  '/•" 

10  39  — 

Traktor  für  NLO  401 

79,50 

Farbband  für  NLQ  401 

14,80 

Farbband  für  DMP2000 

19,80 

Schutzhaube  Rauchglas 
(.  Konsole  464/664 

35, — 

Druckerständer  Rauchglas 

98,— 

Diskbox  3" 

39,80 

RS  232  (V  24) 

168  — 

Telelonmodem 

298,— 

Software: 

Barry  Mc  Guigan's  Boxing 

C/D 

39-/69. — 

Mindshadow 

C/ü 

39-/59, — 

Cheops 

36  — 

Spitlire  40 

C/O 

39-/59. — 

Hyper  Sports 

C/D 

37-/69, — 

Night  Shade 

35  — 

Heavy  on  the  Magic 

39  — 

Blade  Runner 

35,— 

Monty  on  the  Run 

C/D 

39-/59, — 

Vokabeltrainer 

C/D 

49-/59, — 

Verbentrainer 

C/D 

39.-749, — 

Rock'n  Wrestle 

39,— 

Red  Hawk 

35,— 

Blue  Ribbon 

D  59,— 

They  sold  a  Million  II 

C/D 

39-/59  — 

Movie 

C/D 

35,-/49, — 

Ballblazer 

C/D 

39,-759, — 

Back  to  the  Future 

C/D 

39-/59. — 

Rescue  on  Fractalus 

C/D 

39-/59  — 

Batman 

35  — 

Bounder 

35  — 

Fibuking  (Finanzbuchhaltung) 

136  — 

Fakturem  (Speicherfakturierung) 

98  — 

Prolirem  (Faktu,  Lager,  Adressen) 

178,— 

_ J 

Der  Diamant  von  Rabenfels 

Reise  durch  die  Zeit 
Sherlock  Holmes 
Auftrag  In  der  Bronx 

Drachenland 

Die  Insel  der  Smaragde 

je  Adventure 

C/D  DM  SO. _ 

/49 

J 

/" O  Hiermit  bestelle  ich  per  Nachnahme: 


Vorname,  Name 

StraS«.  Heutnumm» 


PLZ.  Ort 

TrtefOA-Nimmcr 


Datum.  Unter  schritt 


Hardware" 


EPROMS 
am  CPC 

-  die  Software 

Wie  versprochen,  erscheint  diesmal 
das  schlüsselfertige  Programm  für  ein 
EPROM. 

Es  stellt  24  RSX-Befehle  zur  Verfü¬ 
gung  und  die  Möglichkeit,  automatisch 
Änderungen  an  den  Voreinstellungen 
des  Betriebssystems  vorzunehmen. 


Wie  man  das  Programm  ins 
EPROM  kriegt 


Starten  Sie  das  BASIC-Programm 
"Patch”  (Listing  1).  Dieses  Programm 
fordert  Sie  zur  Beantwortung  einiger 
Fragen  auf,  und  setzt  ihre  Antworten 
in  sogenannte  "Patches"  um,  d.h. 
es  poked  gemäß  Ihren  Wünschen  das 
im  Speicher  befindliche  ROMSOFT- 
File. 

Am  Schluß  generiert  "Patch”  ein 
neues  ROMSOFT-File,  das  für  die 
Verwendung  im  EPROM  geeignet 
ist. 

Diejenigen,  die  mit  allen  Voreinstel¬ 
lungen  des  ursprünglichen  ROM- 
SOFT-Files  einverstanden  sind,  kön¬ 
nen  sich  das  Laufenlassen  von  "Patch” 
auch  sparen. 

Schließen  Sie  jetzt  den  EPROMMER 
aus  dem  zweiten  Teil  dieses  Berich¬ 
tes  an  und  legen  Sie  ein  EPROM  in 
die  Programmierfassung.  Sie  sollten 
jetzt  auch  die  Programmierspannung 
von  21V  anlegen,  und  dann  ohne 
Pause  ’ROMOUT”  (Listing  2)  star¬ 
ten.  "ROMOUT”  wird  jetzt  einige 
Minuten  laufen  und  dabei  die  Adres¬ 
sen  anzeigen.  Wenn  diese  Prozedur 
fertig  ist,  schalten  Sie  zuerst  die 
Programmierspannung  ab  und  dann 
den  Rechner.  Jetzt  können  Sie  das 
EPROM  in  die  Schaltung  aus  Teil  1 
des  Berichtes  einsetzen  und  anschlie¬ 
ßen. 

Assemblerprogram  mierer  können 
das  ROMSOFT-File  vor  dem  Ein¬ 
brennen  natürlich  beliebig  ändern 
oder  erweitern;  sicher  eine  besonders 
reizvolle  Möglichkeit,  selbstgestrick¬ 
te  RSX-Kommandos  zuverewigen. 
Beachten  Sie  den  Unterschied  zwi¬ 
schen  den  zwei  ROMSOFT-Files  vor 
und  nach  dem  Patchen;  "ROMOUT" 
braucht  das  Gepatchte  und  "Patch” 
das  Original. 

Denjenigen,  die  nicht  über  einen  As¬ 
sembler  verfügen,  möchte  ich  zum 


Kauf  der  Databox  raten.  Das  auf  ihr 
erhältliche  ROMSOFT-File  enthält 
als  kleines  Extra  eine  besonders  aus¬ 
führliche  Anleitung  zu  den  Befehlen 
im  ROM  (RSX-Info). 

Als  problematisch  erwies  sich  das 
Zusammenspiel  von  EPROM  und 
Disklaufwerk.  Möglicherweise  ist  der 
ungepufferte  Bus  des  CPC  nicht 
mehr  stark  genug,  um  beides  korrekt 
anzusteuern. 

Mein  CPC  verfiel  auf  jeden  Fall  in  ein 
größeres  Chaos,  als  ich  beide  Bau¬ 
steine  gleichzeitig  anschloß.  Sollte 
einer  der  Leser  Abhilfe  wissen,  so 
wird  sein  Rat  dankbar  angenommen. 
Bitte  beachten  Sie  in  diesem  Zusam¬ 
menhang  mögliche  Korrekturen  in 
den  kommenden  Heften. 


Die  Befehle 


Zunächst  die  im  ”Patch"-Programm 
veränderbaren  Einstellungen  und 
ihre  Defaults  (Voreinstellungen): 

-  Mode,  Border,  Ink  0  (Default: 
Mode  2,  Border  0,  Ink  0.0) 

-  Die  Einschaltmeldung  (keine 
Vorgabe) 

-  Programmtextkomprimierung  an/ 
aus 

(Default:  an) 

Sollten  Sie  Programmtextkompri¬ 
mierung  "an”  gewählt  haben,  so  wer¬ 
den  überflüssige  Spaces  in  Ihrem 
Programmtext  eliminiert. 

Fest  eingestellt  ist  die  Belegung  der 
Funktionstasten  im  Zehnerblock 
<0>  <.>  <enter>  <1>  <2>  und 
<3>  auf  <Shift>-Ebene: 

<0>  :  LIST 
<>  :  ED  IT 
<enter>  :  RUN  er 
<1>  :  CAT  er 
<2>  :  AUTO  er 
<3>  :  C'LS  er 

ersteht  fürCarriage  Return,  gleichbe¬ 
deutend  mit  ENTER. 
Diskettenbesitzer  werden  weiterhin 
gefragt,  ob  Sie  CP/M  starten  wollen. 
Vergessen  Sie  nicht,  daß  Sie  eine  CP/ 
M-Diskette  einlegen  müssen,  bevor 
Sie  diese  Wahl  mit  <ENTER> 
annehmen. 

Lehnen  Sie  CP/M  mit  einer  beliebi¬ 
gen  anderen  Taste  ab,  so  werden  Sie 
gefragt,  ob  Sie  "Turbodos“  aktivieren 
wollen.  Wenn  Sie  mit  <ENTER>  an¬ 
nehmen,  wird  das  AMSDOS  so  ge- 
patcht,  daß  die  Diskoperationen  ea. 
20  %  schneller  sind  als  bisher. 
Besonders  wenn  Sie  Laufwerke  von 
Fremdherstellern  verwenden,  sollten 
Sie  aber  ablehnen  (jede  andere  Ta¬ 
ste),  wenn  es. nicht  so  sehr  auf  Ge¬ 


schwindigkeit  ankommt.  Turbodos 
wird  in  CPC  International  1/86 
näher  erläutert. 


Speicherplatz 


HIMEM  wird  durch  ROMSOFT  nur 
um  4  Byte  verringert  (diese  4  Byte  be¬ 
nötigt  das  Betriebssystem  zur  Verwal¬ 
tung  der  RSX).  Es  sollten  also  annä¬ 
hernd  alle  Programme,  wie  bisher 
funktionieren. 

Es  stehen  24  neue  Befehle  zur  Verfü¬ 
gung,  die  im  folgenden  einzeln  er¬ 
läutert  werden. 

INFO: 

Gibt  einige  Informationen  zu  den 
neuen  Befehlen  aus.  Der  Text  ent¬ 
spricht  bei  der  ROMSOFT- Version 
der  Databox  etwa  dem.  den  Sie  ge¬ 
rade  lesen. 

TB: 

Zeigt  die  Tastaturbelegung  der  Fun k- 
tionstasten  an. 

NON: 

NLQ  ON;stellt  am  Drucker  NLQ  ein, 
wenn  dieser  angeschlossen  und  aktiv 
ist.  Andernfalls  wird  eine  Fehlermel¬ 
dung  ausgegeben. 

NOFF: 

Stellt  NLQ  wieder  ab. 

HC: 

Gibt  eine  Texthardcopy  auf  den 
Drucker  aus,  wenn  dieser  angeschlos¬ 
sen  und  aktiviert  ist. 

Die  Hardcopy  kann  mit  <ESC>  ab¬ 
gebrochen  werden  (etwas  länger 
drücken). 

Alle  bis  jetzt  genannten  Befehle  ar¬ 
beiten  ohne  Parameter,  d.h.  alleine 
durch  das  Eintippen  des  Namens  mit 
einem  <SHIFT>  <Klammeraffe> 
davor  und  anschließendem  <EN- 
TF,R>. 


Befehle  mit  Parametern 


HOCH,byte: 

Serollt  den  Bildschirm  eine  Textzeile 
hoch  und  fällt  den  neuen  Bereich  mit 
"byte”.  Bei  richtiger  Codierung  ent¬ 
spricht  "byte"  einer  Farbe,  an¬ 
dernfalls  ergibt  sich  ein  Muster.  Bitte 
experimentieren  und  in  CPC  Inter¬ 
national  1 1/85,  S.34  naehlesen. 

RUNTER, byte: 

Serollt  den  Bildschirm  eine  Textzeile 
runter. 

NEXTLINE,  Adresse  Integervariable: 

Dieser  Befehl  berechnet  die  Bild¬ 
schirmadresse.  die  um  eine  Linie 
unter  der  angegebenen  liegt.  Die 
ursprüngliche  Adresse  muß  in  einer 
Integervariablen  stehen,  deren  Adres- 
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se  mittels  Klammeräffchen  an  "Next- 
line"  zu  übergeben  ist. 

"Nextline"  schreibt  die  neue  Adresse 
in  die  Variable  zurück. 

Beispiel:  10  intvar%=&C000 

20  lnexlline,@intvar% 

PRELINE,  Adresse  Integervariable: 

Wie  "Nextline",  nur,  daß  eine  Linie 
hochgerechnet  wird. 

N E XTB YTE/ PRF. BYTE ,  Adresse 
Integervariable: 

Berechnet  das  Byte,  das  rechts/links 
neben  dem  angegebenen  auf  dem 
Bildschirm  steht.  Bedienung  wie 
"Nextline". 

RDCHAR,  Adresse  Integervariable: 

Liest  das  an  der  Cursorposition  auf 
dem  Bildschirm  stehende  Zeichen 
und  übergibt  den  ASCII-Wert  des 
Zeichens  in  der  Integervariablen. 
Beispiel: 

10  intvar%=Ö:REM  muß  einmal  be¬ 
nutzt  worden  sein 
20  locate  20,20 
30  lrdchai.@intvar% 

40  locate  20.21:?chr$(intvar%) 

Das  Beispiel  kopiert  das  Zeichen  auf 
20,20  nach  20,21. 

FILL,  byte,  Höhe,  Breite,  Abstand  von 
links,  Abstand  von  oben: 

Dieser  Befehl  fällt  einen  Bildschirm¬ 
bereich  mit  der  angegebenen  Höhe 
und  Breite  (mindestens  1)  und  einem 
Abstand  von  links  und  von  oben 
(mindestens  1)  mit  dem  Byte.  Wie¬ 
derum  ergibt  sich  bei  richtiger  Kodie¬ 
rung  von  "byte"  eine  Farbe.  Hierzu 
siehe  "HOCH". 

DEL,  byte: 

Löscht  den  Bildschirm  mit  "byte” 
(vgl.  HOCH  ).  Dieses  Löschen  geht 
absichtlich  langsam,  weil's  dann  gut 
aussieht. 

Kurze  Erläuterung  des  Klammeräff¬ 
chens: 

Das  "Äffchen"  ist  eine  BASIC- 
Funklion  und  gibt  die  Adresse  einer 
Variablen  zurück.  Bei  Slringvaria- 
blen  ist  es  die  Adresse  des  Stringdes- 
criplors. 

SCRIPT,  (Einrückung): 

Durch  "SeripCgehl  derCPC  in  einen 
Schreibmaschinenmodus  über,  wenn 
ein  Drucker  angeschlossen  ist.  Um 
das  "Papier”  besser  erkennen  zu  kön¬ 
nen,  wird  der  Border  etwas  heller  ein¬ 
gestellt.  Der  Cursor  steht  4  Zeichen 
vom  Rand  entfernt,  um  die  Ein¬ 
rückung  zu  symbolisieren,  die  bei  der 
Druckerausgabe  dem  Text  vorange¬ 
stellt  wird.  Die  Angabe  der  Ein¬ 


rückung  ist  optional;  die  Voreinstel¬ 
lung  ist  5.  Die  Einrückung  kann  nicht 
größer  als  15  gewählt  werden.  Der  am 
Bildschirm  editierte  Text  wird  nach 
<Enter>  ausgegeben.  Es  empfiehlt 
sich,  <Enter>  bereits  vor  dem  Ende 
einer  Bildschirmzeile  zu  drücken,  da 
beim  automatischen  Zeilenumbruch 
des  Druckers  die  Einrückung  nicht 
berücksichtigt  wird. 

Das  beste  Bild  ergibt  sich,  wenn  man 
schon  einige  Zeichen  vor  dem  Ende 
der  Zeile  <Enter>  drückt  (gewisser¬ 
maßen  eine  Einrückung  von  rechts). 

Die  Cassettenbefehle  RDCAS  und 
VVRCAS: 

Sie  erlauben  ungeblocktes  Ablegen 
und  Laden  von  Binärfiles  auf  Cas- 
sette  mit  fast  beliebiger  Baudrate. 
Interessant  für  lange  Spiele  mit  sonst 
ewigen  Ladezeiten.  Derart  gespei¬ 
cherte  Programme  müssen  mit  "Call 
adresse"  gewissermaßen  von  Hand 
gestartet  werden. 

R(ea)dcas  dient  zum  Laden  und 
Wr(ite)cas  zum  Ablegen. 

WRCAS,  Startadresse,  Länge,  Syn¬ 
chronzeichen,  Rate: 

Startadresse  ist  die  Adresse,  an  der 
das  Programm  beginnt;  Länge  ist  die 
absolute  Länge  des  Programms.  Das 
Synchronzeichen  ersetzt  den  nicht 
angebbaren  Namen;  deshalb  mer¬ 
ken.  Die  Baudrate  errechnet  sich  aus: 
Baudrate  =  333333  /  rate 
Z.B.  ist  Rate  =111  für  3000  baud. 
Erfahrungsgemäß  funktioniert  dies 
höchstens  bis  etwa  3500  baud. 

Bitte  ausprobieren. 

RDCAS,  Startadresse,  Synchronzei- 
chen: 

Das  Synchronzeichen  sollte  das  glei¬ 
che  wie  beim  Ablegen  sein. 

Auf  die  Baudrate  stellt  sich  Rdcas 
selbsttätig  ein. 

Die  Discbefehle  PUT  und  GET: 

Diese  Befehle  ermöglichen  direktes 
Beschreiben  und  Lesen  einzelner 
Sektoren  der  Diskette.  Damit  läßt 
sich  leicht  ein  Discmonitor  odereine 
relationale  Datenbank  programmie¬ 
ren.  Im  Umgang  mit  diesen  Befehlen 
(besonders  PIJT)  ist  aber  Vorsicht  ge¬ 
boten,  um  keine  Dateien  zu  zerstören. 

Besonders  wichtig: 

Der  Sektor  ist  mit  einem  Offset  anzu¬ 
geben,  mit  dessen  Hilfe  AMSDOS 
CP/M  und  Datendisketten  unter¬ 
scheidet. 

Die  Sektoren  sind  wie  folgt  numeriert: 
CP/M:  &41  bis  &49 
Data-only:  &C1  bis  &C9 
Es  empfiehlt  sich,  den  Puffer  ober¬ 


halb  HIMEM  anzulegen,  um  Zerstö¬ 
rung  von  Programmen  zu  vermeiden. 
Prinzipiell  darf  er  aber  überall  liegen 
(so  lassen  sich  tolle  Overlays  pro¬ 
grammieren). 

GET,  Laufwerk,  Track,  Sector, 
Pufferadresse: 

Dient  zum  Laden  von  Disc.  Bei  Lauf¬ 
werk:  0  für  A  und  1  für  B. 

Tracks  von  Obis  39.  Sektoren  von  1  bis 
9  PLUS  OlTset!  Pufferadresse  für  512 
byte  RAM  (oberhalb  HIMEM). 

PUT,  Laufwerk,  T rack,  Sector, 
Pufferadresse: 

Dient  zum  Ablegen  auf  Disc.  Sonst 
alles  gleich  wie  bei  GET. 


Die  Monitorbefehle 


Die  folgenden  Befehle  bilden  zusam¬ 
men  einen  "Minimonitor": 

DUMP,  Start,  (Ende),  (Drucker) 
Dump  listet  den  RAM-Inhalt  von 
Start  bis  Ende.  Ende  ist  optional,  die 
Voreinstellung  ist  256  Byte  (eine 
Seite).  Das  dritte  Argument  ist  ein 
Scheinargument,  darf  also  jeden 
Wert  annehmen.  Alleine  durch  sein 
Vorhandensein  wird  die  Liste  auf  den 
Drucker  ausgegeben,  wenn  es  geht. 
Das  Auilisten  läßt  sich  mit 
<SHIFT>  anhalten,  solange  es  ge¬ 
drückt  bleibt. 

MODIFY,  Start 

Dient  zur  Veränderung  des  RAM  ab 
der  Startadresse.  X  beendet  Modify. 
<Enter>  behält  den  alten  Wert  bei. 
FLOOD,  Start,  Länge,  byte 
Flood  fällt  den  Speicherbereich  ab 
Start  mit  der  angegebenen  Länge 
mit  "byte". 

MED  IT,  adresse 

M(emory)edit  dient  zum  Ablegen  von 
Text  (max.  255  Zeichen)  im  RAM. 
Der  Text  wird  mit  einem  Nullbyte 
abgeschlossen. 

SEARCH,  Start,  Länge,  byte 
Search  sucht  nach  "byte"  ab  Start  bis 
Start  +  Länge  und  gibt  die  jeweilige 
Adresse  mit  den  folgenden  16  Bytes 
aus.  Die  Ausgabe  kann  mit  <SHIFT> 
angehalten  werden. 

Die  Monitorbefehle  ergeben  zusam¬ 
men  mit  GET  und  PUT  praktisch 
schon  einen  Discmortitor  für  inter¬ 
aktiven,  d.h.  nicht  programmierbe- 
dürftigen  Betrieb. 

Das  Ergebnis  einer  RAM-Modifikation 
(z.B.  mit  Modify)  kann  mit  der  B- 
Option  des  Savebefehls  auf  Cassette 
oder  Disc  gespeichert  werden  und  mit 
'Load  ("Name",  adresse)'  an  beliebi¬ 
ger  Stelle  wieder  eingelesen  werden 
(Adresse  ist  optional). 

(J.  Hüpper/ME) 
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in  11111111111111111111111111111111111  . . . . min 


10  MEMORY  43FFF 

20  LOAD" ramBof t . bin"  ,  44000 

30  FGR  wertadresse=44000  TO  47FFF 

40  wert=PEBK< wertadresse)  :  OUT  4FBFB, wert:  PRIHT  HEX 
* ( wertadresse ) , 

50  FOR  zeit=l  TO  50:MEXT  zeit 
60  HEXT  wertadresse 
70  EHD 


Listing  1 


10  MEMORY  43FFF 
20  LOAD" roneof  t"  ,  440  00 
30  MODE  2 

40  PRIHT'#**#********##*******  PATCH  -  PROGRAMM  RO 
MSOFT  **************************" 

50  PRIHT: PRIHT 

60  IIPUT  "Welcher  Mode  eoll  eingeschaltet  werden  ? 

0,1,2  :  ",m 

70  IF  t»<0  OR  m>2  THEH  PRIHT'Eingabefehler  !":G0T0 
60 

80  POKB  44  0CE , m 

90  IHPÜT  "Welche  Farbe  soll  der  Border  annehmen  ? 
0-27  :  " , b 

100  IF  b<0  OR  b>27  THEH  PRIHT'Eingabefehler  !":GOT 
0  90 

110  POKE  440D3, b: POKE  440D4,b 

120  IHPUT  "Soll  die  Progranuntextkamprinierung  akti 
v  sein  ?  j/n  :  " , k* 

130  IF  LOWER* <k*)="n"  THEH  POKB  440E9,0:GOTO  160 
140  IF  LOWER* Ck*>="j"  THEH  GOTO  160 
150  IHPÜT  "Soll  die  Programmtextkomprimierung  akti 
v  sein  ?  J/n  :  ”,k* 

160  IF  LOWER* <k*)=”n"  THEH  POKE  440E9,0:GOTO  190 

170  IF  LOWER* Ck*)="j"  THBH  GOTO  190 

180  PRIHT'Eingabefehler  !":GOTO  150 

190  PRIHT:  PRIHT" Geben  Sie  jetzt  die  Einschaltneldu 

ng  ein  :” 


200  LIHE  IHPÜT  "",em* 

210  FOR  lf=l  TO  LBH<em») 

220  as=ASC<MID* <em*, lf , 1) ) : POKE  442C9+lf,as 
230  HEXT 

240  SAVE" romsoft" ,b, 44000,  43800 
250  EHD 


Listing  2 

10  DATA  401 , 400, 400,  400,  451, 4C0, 4C3, 4CA, 4C0, 4C3, 4C 
A , 4C3 , 4C3 , 4D8 , 4C3 , 4C3 ,  2256 

20  DATA  4E6 , &C3 , 4C3 , 4F7 , 4C3 , 4C3 , 404 , 4C4 , 4C3 ,  41 1 , 4C 
4,4C3,47A, 4C4, 4C3.4B3,  2752 

30  DATA  4C4 , 4C3, 489, 4C1 , 4C3 , 4DC, 4C4 , 4C3, 433 , 4C5 , 4C 
3,460,405,403,493,405,  2814 

40  DATA  403, 429, 406,403, 436, 406,403, 443, 406, 403,49 
E , 406 , 4C3 , 4EE , 407 , 403 ,  2719 

50  DATA  444, 409, 403, 475, 409, 4C3.49B, 409,403, 410,40 
A, 403, 42B, 4CA, 403, 43A,  2451 

60  DATA  4CA, 449, 44E, 449, 4D4, 448, 44F, 443, 408,452, 45 
5, 44E, 454, 445, 4D2, 44E,  1742 

70  DATA  445,  458,  454 , 440,  449,  44 E,  405,  450,  452, 445,  44 
C,  449,  44E, 405, 44E, 445,  1467 

80  DATA  458,454,442,459,454,405,450,452,445,442,45 
9,454,405,452,444,443,  1492 

90  DATA  448, 441, 4D2, 446, 449,  440, 400,454, 402, 457, 45 
2,  443, 441, 4D3, 452, 444,  1710 

100  DATA  443, 441, 4D3, 444, 445, 400,453, 443, 452, 449, 4 
50, 4D4.44E, 44F, 4CE, 44E,  1722 

110  DATA  44F,  446, 406, 448, 403, 444, 455,  44D,  4p0, 44D,  4 
4F , 444 , 449 , 446 , 4D9 , 446 ,  1706 

120  DATA  440,  44F,  44F,  404, 44D,  445,  444,  449, 4D4, 453, 4 
45,441,452,443,408,447,  1566 

130  DATA  445,  4D4, 450, 455, 4D4, 449, 44E, 446, 4CF, 400, 4 
05,  4D5,  4E5, 43B, 402, 4CD,  1994 

140  DATA  40E, 4BC, 401 , 400, 400, 4CD, 438, 4BC, 4AF, 401 , 4 
00, 400, 4CD, 432, 4BC, 421,  1304 

150  DATA  4CA, 402, 4CD, 480,401, 4CD, 42E, 401, 43E, 4FF, 4 
32, 400, 4AC, 43A, 466, 4BE,  2267 

160  DATA  4FE,  410, 428, 405, 437, 4E1.4D1, 401,409, 421, 4 
EA,  401 , 4CD,  480,  40 1 , 4CD,  2401 

170  DATA  495, 401, 420, 408, 40E, 407, 421, 4B2, 401,403, 4 
16, 4BD,  421 , 413,  402, 4CD,  1664 

180  DATA  48C, 4C1.4CD, 495, 401,420, 412, 4CD,4A0,4C1,  4 
21 , 4A4, 4AC, 4DF, 4B7, 40 1 ,  2504 

190  DATA  4CD.4AC, 401,421, 440, 402, 4CD, 48C, 401 , 4E1 , 4 
Dl, 401,437, 409,421,400,  2507 

200  DATA  401, 40E, 406, 47E, 423, 446, 423, 4E5, 4CD, 42D, 4 
BB, 4E1 , 40D, 420, 4F4 , 421 ,  1692 

210  DATA  400,401, 411, 4A4, 4AC, 401.41B, 400, 4ED,  4B0, 4 
06, 48D, 40E, 405 , 421 , 4A4 ,  1554 

220  DATA  4AC.4CD,  40F.4BB, 406, 48E, 40E, 405, 421, 4A9, 4 
AC,4CD,40F,4BB,  406,48P-,  1676 

230  DATA  40E,  404, 421, 4AB,  4AC,  4CD,  40F,  4BB,  406, 490, 4 

OE,  404, 421, 4B2, 4AC, 4CD,  1560 

240  DATA  40F ,  4BB,  406,  491 , 40E,  405 , 421 , 4B6 , 4AC, 4CD, 4 

OF,  4BB,  406, 492, 40E,  404,  1336 

250  DATA  421 , 4BB, 4AC, 4CD, 40F, 4BB, 4CD, 4AC,  40 1 , 421 , 4 
5E, 4C2 , 47E, 4B7 , 4C8, 4CD,  2404 

260  DATA  45A,  4BB,  423,  418,  4F7, 43E,  400,  432,  4A4,  4AC,  4 
CD, 418, 4BB, 4FE, 40D, 4C9,  1915 


270  DATA  421 , 4B7 , 4C1 ,411, 4A4 , 4AC, 401 , 409, 400, 4BD,  4 
BO , 409 , 4 AF , 421, 4A4 , 4AC ,  1930 

280  DATA  406, 420, 477, 423, 410, 4FC, 409,423, 400,408.4 
00, 401, 401, 40A, 401, 403,  912 

290  DATA  40F, 48D, 407, 48E, 406, 48F, 40D, 490, 40E, 491 , 4 
05,492,440,449,453,454,  1237 

300  DATA  420, 445, 444, 449, 454, 420, 452, 455, 44E.40D, 4 
43, 441, 454, 40D, 441, 455,  995 

310  DATA  454 , 44 F , 40D, 443 , 44C, 453 , 40D,  40D,  406 , 407 , 4 
OA, 40D, 453, 46F, 46C, 46C,  1066 

320  DATA  420, 443, 450, 42F, 44D, 420, 467, 465, 462, 46F, 4 
6F,  474, 465, 474, 420, 477,  1343 

330  DATA  465, 472, 464, 465, 46E, 420, 43F, 420, 430, 445, 4 
4E,  454, 445,  452, 43 E,  420,  1189 

340  DATA  40A, 40D, 400, 453, 46F, 460,460, 420, 454, 455, 4 
52, 442, 44F, 42D, 444, 44F,  1053 

350  DATA  453, 420, 461, 46B, 474, 469, 476, 469, 465, 472, 4 

74.420.477.465.472.464,  1560 

360  DATA  465, 46E, 420, 43F, 420,430, 445, 44E, 454, 445, 4 
52, 43E, 420, 40A, 40D, 400,  897 

370  DATA  42D, 42D, 42D, 42D, 42D, 420 , 454 , 455 , 452, 442 , 4 
4F, 42D, 444, 44F, 453, 420,  960 

380  DATA  441, 44B, 454, 449, 456, 420, 42D, 42D, 42D, 42D, 4 
2D, 40A, 40D, 400, 40A, 40D,  686 

390  DATA  454, 461, 473, 474, 465, 46E.462, 465, 460,465, 4 
67, 475, 46E, 467, 420, 469,  1601 

400  DATA  46D, 420, 45A, 465, 468, 46E, 465, 472, 462, 460, 4 
6F, 463, 46B, 420, 430,453,  1459 

410  DATA  448,449,446, 454, 43E, 420, 43A,40A,40D, 430,4 
43,441,454,463,472,438,  1025 

420  DATA  420, 420, 420, 420, 430,441, 455, 454, 44F, 463, 4 
72, 43E, 420, 420, 420, 420,  904 

430  DATA  43C, 443, 440,453, 463, 472, 43E,40A,40D, 430, 4 
40,449, 453, 454, 420, 43E,  1054 

440  DATA  420,420,420,420,430,445,444,449,454,420,4 
3E, 420, 420, 420, 420, 420,  736 

450  DATA  430, 452 , 455, 44E, 463 , 472 , 43E , 40A, 40D , 400, 4 
00,400,400,400,400,400,  603 

460  DATA  400,400,400,400,400,400,400,400,400,400,4 
00,400,400,400,400,400,  0 

470  DATA  400,400,400,400,400,400,400,400,400,400,4 
00,400,400,400,400,400,  0 

480  DATA  400,400,400,400,400,400,400,400,400,400,4 
00,400,400,400,400,400,  0 

490  DATA  400,400,400,400,400,400,400,400,400,400.4 
00,400.400,400,400,400,  0 

500  DATA  400,400,400,400,400,400,400,400,400,400,4 
00,400,400,400,400,400,  0 

510  DATA  400,400,400,400,400,400,400,400,400,400,4 
00,400,400,400,400,400,  0 

520  DATA  400,400,400,400,400,400,400,400,400,400,4 
00,400,400,400,400,400,  0 

530  DATA  400,400,400,400,400,400,400,400,400,400,4 
00,400,400.400,400,400,  0 

540  DATA  400,400,400,400,400,400,400,400,400.400,4 
00,400,400,400,400,400,  0 

550  DATA  400.400,400,400,400,400,400,400,400,400,4 
00,400,400,400,400,400,  0 

560  DATA  400,400,400,400,400,400,400,400,400,400,4 
00,400,400,400,400,400,  0 

570  DATA  400,400,400,400,400,400,400,400,400,400,4 
00,400,400,400,400,400,  0 

580  DATA  400,400,400,400,400,400,400,400.400,400,4 
00,400,400,400,400,400,  0 

590  DATA  400,400,400,400,400,400,400,400,400,400,4 
00,400,400,400,400.400,  0 

600  DATA  400,400,400,400,400,400,400,400,400,400,4 
00,400,400,400,400,400,  0 

610  DATA  400,400,400,400,400,400,400,400,400,400,4 
FE, 401, 4C2, 457,404, 4DD,  953 

620  DATA  47B, 400. 406, 401 , 4CD, 44D, 4BC, 4C9, 4FE, 401 , 4 
C2, 457,  4C4, 4DD, 47B, 400,  1883 

630  DATA  406, 400, 4CD, 44D, 4BC, 4C9, 4FE, 401, 402,457, 4 
C4.4CD, 41E, 4C4, 4CD, 426,  2083 

640  DATA  4BC, 47C, 402, 40B, 47D, 402, 409, 4FE, 401, 402, 4 
57, 4C4, 4CD, 41E, 4C4 , 4CD,  2021 

650  DATA  429, 4BC, 418, 4ED.4FE, 401,402, 457, 4C4.4CD, 4 
IE,  4C4 , 4CD,  420’,  4BC,  418 ,  2102 

660  DATA  4E0, 4FE, 401 , 402, 457, 404. 4CD, 41E, 4C4 , 4CD, 4 
23 , 4BC, 418 , 4D3, 4DD, 446,  2341 

670  DATA  401 , 8DD, 44B, 400, 40A, 46F, 403, 40A, 467 , 4B5, 4 
05,401,400,440,409,401,  1230 

680  DATA  4E1, 4D8.4E1, 421, 43A, 404, 4CD,  480,  401,409, 4 
OA,  40D, 455, 46E, 462, 472,  2122 

690  DATA  461,475,463,468,462,461,472,465,420,441.4 

64.472.465.473.473.465,  1570 

700  DATA  420, 421 , 421 , 421 , 40 A, 4 OD, 400, 421 , 45E, 404 , 4 
CD, 48C, 4C1 , 4C9, 40A, 40D,  1239 

710  DATA  446, 465, 468, 460, 465, 46B, 464, 465, 472, 420, 4 
50, 461, 472, 461, 46D, 465,  1539 

720  DATA  474, 465, 472, 420, 421, *21, 421, 40A, 400,400, 4 
FE,  401, 402, 457, 404, 4DD,  1436 

730  DATA  466, 401, 4DD, 46B, 400, 4CD, 460,  4BB,  430,  402, 4 
77,  409,  421, 493, 404, 4CD,  1873 

740  DATA  480, 4C1 , 409, 40A, 40D, 44B, 465, 469, 46E, 420, 4 
72,465,467,475,460,461,  1620 

750  DATA  465, 472,  465, 473, 420, 45A, 465, 469, 463, 468, 4 
65, 46E, 420, 421, 421, 421,  1304 

760  DATA  40A, 40D, 400, 4FE, 405, 402, 457, 4C4, 4CD,  40B, 4 
BC,  447, 40B, 400, 409, 4DD,  1478 

770  DATA  446, 400, 4CD, 426, 4BC, 410, 4FB, 4DD, 446 , 402, 4 


24  CPC  8  ’86 


CD.S20, SBC, S10,SFB,SDD,  1974 

780  DATA  S56, &04 , SDD, &5E, S06, SDD, S4E, S08 , SCD,  S47 , S 
BC,  SC9 ,  SFE, S04 , SC2 , S57,  1922 

790  DATA  SC4,  S21 , S16, &C5,  SCD, S8C, SCI, SCD, S95, SCI, S 
DD, S6E, S00, SDD, S66, SOI,  2188 

800  DATA  S3E, SOA, SCD, S68 , SBC , SCD, S6B, SBC, SDD,  S6E, ft 
06 , SDD, S66 , S07 , SDD, S5E,  2054 

810  DATA  S04, SDD, S56, S05, SDD, S7E.S02, SCD, S9B, SBC,  S 
CD , S7 1 , SBC , S2 1 , S5  0 , SO 1 ,  1636 

820  DATA  S3E, SOA, SCD, S68 , SBC, SC9 , SOA , SOD, S3C, S52 ,  S 
45, S43, S3E, S20, S26, S20,  1235 

830  DATA  S3C, S50, S4C, S41 , S59, S3B, S20, S26, S20, S3C, S 
54 , S41 , S53, S54, S45, S3E,  1041 

840  DATA  SOA, SOD, SOO, SFE, S02, SC2, S57, SC4, S21 , S57, S 
C5 , SCD, S8C, SCI , SCD, S95 ,  1965 

850  DATA  SCI , SCD, S6E, SBC,  SDD, S6E, S02, SDD, S66, S03, S 
DD, S7E, SOO, Sil, SOO, SOO,  1719 

860  DATA  SCD, SA1, SBC, SCD, S71 , SBC, SC9, SOA,  SOD, S3C, S 
50, S4C, S41 , S59, S3E, S20,  1748 

870  DATA  S26, S20, S3C, S54, S41, S53, S54, S45, S3E, SOA, S 
OD, SOO, SFE, SOI,  SC2,  S57,  1136 

880  DATA  SC4 , SCD, SOB, SBC, S47, SOE, SOO, S09, SE5 , SOE, S 
C8, SCD,  S19, SBD, S06, S50,  1642 

890  DATA  SDD, S7E, SOO, S77, SCD, S20, SBC, S10, SF7, SEI , S 
CD, S26,  SBC, SE5, SOD, S20,  2084 

900  DATA  SEA, SEI , SC9, SFE,  SOI , S28,  S04 , SDD,  S21 ,  S07 ,  S 
00 ,  S3E,  S02 , SCD, SOE, SBC,  1691 

910  DATA  SOI , S04 , S04, SCD, S38 , SBC, S21 , SDE, SC5, SCD, S 
8C, SCI, S21, SA4, SAC, S06,  1823 

920  DATA  SFF, SAF, S77, S23, S10, SFC, S21 , SA4, SAC, SCD, S 
3  A , SBD , S3 A , SA4 , SAC , SB7 ,  2250 

930  DATA  S28, S15.S21, SA4, SAC, SDD, S46, SOO, SCD, SE7, S 
C5 , S3E,  SOD, SCD, S5A, SBB,  1911 

940  DATA  S3E, SOA, SCD, S5A, SBB, S18, SCF, SOI,  SOO,  SOO,  S 
CD,  S38,  SBC,  SC9, S09, S09,  1454 

950  DATA  S09,  S09,  SOO,  SOO,  SOO,  SOO, SOO, SCD, S2E, SBD, S 
30 , S07,  S21 , S13, SC6, SCD,  968 

960  DATA  S8C, SCI , SC9, S78, SE6, SOF, S47, S3E, S20,  SCD,  S 
09 , SC6 , S 1 0 , SF9 , S7E , SB7 ,  2178 

970  DATA  S28, S06, SCD, S69, SC6, S23, S18, SF6, S3E, SOA, S 
CD , S89 , SC6 , S3E , SOD , SCD ,  1783 

980  DATA  S89,  SC6,  SC9,  SOA,  SOD,  S44  ,  S52,  S55,  S43,  S4B,  S 
45 , S52 , S20 , S46 , S45 , S48 ,  1330 

990  DATA  S4C, S54 , S20 , S21 , S21 , S21 , SOA, SOD, SOO , S21 , S 
32, SC6, S06, SOO, SCD, SE7,  1037 

1000  DATA  SC5,  SC9, S1B, S49, S03, SOO, S21, S3F, SC6, S06, 
SOO, SCD, SE7, SC5 , SC9, S1B,  1662 

1010  DATA  S49,  SOI , SOO , SCD, S2E, SBD, S30, S07 , S21 , S13, 
SC6,  SCD, S8C, SCI , SC9, S3E,  1620 

1020  DATA  SOA,  SCD, S89,  SC6,  S3E, SOD, SCD, S89, SC6 , S2E, 
SOI , S26, SOI , SE5, SCD, S75 ,  1802 

1030  DATA  SBB, SCD, S60, SBB, S38, S02, S3E, S20, SCD,  S89, 
SC6 , SEI , SCD, S92 , SC 6 , SCO ,  2333 

1040  DATA  S24, S7C, SFE, S51 , S20, SE7, S3E, SOA, SCD, S89, 
SC6,  S3E,  SOD,  SCD,  S89, SC6,  1985 

1050  DATA  S26,  SOI,  S2C,  S7D,  SFE,  S1A,  SC8,  S18,  SD4,  SCD, 
S2B, SBD, S38, SFB, SCD, S31,  1925 

1060  DATA  SBD, SC9, SE5,SC5,SD5, S3E, S42, SCD, SIE, SBB, 
SD1 , SCI , SEI , SC9, SFD, S21 ,  2693 

1070  DATA  SOO, SOO, SFE, S03, S20, SOB, SCD, S2E, SBD, S38, 
SIE, SFD, S21, SOI, SOO, S18,  1137 

1080  DATA  S18 , SFE, S02 , S28, S33, SFE, SOI , SC2 , S57 , SC4 , 
SDD,  S6E,  SOO,  SDD,  S66,  SOI,  1758 

1090  DATA  S7D, SE6, SFO, S6F, S5D,  S54 , S14, SIS,  S2D,  SDD, 
S6E, S04, SDD, S66, S05, SDD,  1856 

1100  DATA  S5E, S02, SDD, S56, S03, SE5, S37, S3F.SED, S52, 
SEI,  SD2,  S58, SC7, S7D, SE6,  2149 

1110  DATA  SFO , S6F, S7B, SF6, SOF, S5F, S18, SOE, SDD, S6E, 
S02, SDD, S66, S03, SDD.S5E,  1842 

1120  DATA  SOO , SDD, S56 , SOI , S18 , SDF, SE5, SD5 , S3E, S02 , 
SCD, SOE, SBC.S21, S75.SC7,  1817 

1130  DATA  SCD, S8C, SCI , SD1 , SEI , S7C, SCD, SB7,  SC7 ,  S7D, 
SCD , SB7 , SC7 , S3B , S2  0 , SCD ,  2694 

1140  DATA  S9F, SC7, S3E, S20, SCD, S9F, SC7, S06, S10, SE5, 
SE7, SCD, SB7, SC7, S23, S3E,  2181 

1150  DATA  S20, SCD, S9F, SC7 , S10 , SF4 , SEI , S3E, S20, SCD, 
S9F, SC7, S3E, S20, SCD, S9F,  2195 

1160  DATA  SC7,  S06,  S10,  SE7,  SCD,  S9F,  SC7,  S23,  S10,  SF9, 
S3E, SOA, SCD, SA7, SC7, S3E,  2020 

1170  DATA  SOD,  SCD,  SA7,  SC7,  SE5,  SC5,  S3B,  S15,  SCD,  SIE, 
SBB, S20, SF9, SCI , SEI , SE5,  2443 

1180  DATA  S37, S3F, SED, S52 , SEI , SDO , S18 , SAD, S21 , S5F, 
SC7  ,  SCD,  S8C, SCI , SC9, SOA,  2143 

1190  DATA  SOD, S41, S6E, S66, S61 , S6E, S67, S20, S3E, S20, 
S45, S6E, S64, S65, S20, S21,  1171 

1200  DATA  S21 , S21 , SOA, SOD, SOO , S52 , S41 , S4D, S20 , S46, 
S65, S78,  S64, S75, S6D, S70,  1076 

1210  DATA  S20 , S3A, S20, S41 , S64 , S72 , S65 , S73 , S73,  S65, 
S20, S2F, S20, S42, S79, S74,  1247 

1220  DATA  S65, S73, S20, S2F, S20, S41 , S53, S43, S49, S49, 
SOA, SOD, SOA, SOD, SOO, SE8,  964 

1230  DATA  S7F,  SFE,  S20,  S30,  S02,  S3E,  S2E,  SF5,  S3E,  S89, 
SFD,  SBE,  SOO,  S28, S04, SF1,  1743 

1240  DATA  SC3 , S5A, SBB, SF1 , SC3, S89, SC6, SE5, SC5, SF5 , 
SE6, SFO, SOF, SOF, SOF, SOF,  2444 

1250  DATA  S21 , SDC, SC7 , S4F, S06 , SOO, S09, S7E, SCD, S9F, 
SC7,  SF1,  SE6, SOF, S21, SDC,  1974 

1260  DATA  SC7 , S4F, S06 , SOO, S09 , S7E, SCD, S9F, SC7 , SCI , 
SEI, SC9, S30, S31, S32, S33,  1799 

1270  DATA  S34, S35, S36, S37, S38, S39, S41, S42, S43, S44, 
S45,  S46,  SOO, SOO, SFE, SOI,  987 


. Hardware" 

1280  DATA  SC2  ,  S57  ,  SC4,  SFD,  S21,  SOO,  SOO,  SDD,  S6E,  SOO, 

SDD, S66 , SOI , SO 1 , S70 , SOI ,  1532 

1290  DATA  SE5 , S37 , S3F, SED, S42, SEI , S30 , S06 , S21 , SEO , 

SC8 , SC3 , SBC, SCI, SE5, S3E,  2205 

1300  DATA  S02,  SCD,  SOE,  SBC, S3E, SFF, SOI, SE8, SB4, S02, 

S21, SF9, SC8, SCD, S8C, SCI,  2161 

1310  DATA  SEI, S7C, SCD, SB7, SC7, S7D, SCD, SB7 , SC7 , S06, 

S06, S3E, S90, SCD, S5A, SBB,  2348 

1320  DATA  S10,  SF9,  SE7,  SCD,  SB7,  SC7,  S06,  SOS,  S3E,  S90, 

SCD, S5A, SBB, S10, SF9, SCD,  2255 

1330  DATA  S82, SC8 , SFE, SOD, S20, Sil, SE7 , SCD, SB7 , SC7 , 

S23, S3E, SOA, SCD, S5A, SBB,  2053 

1340  DATA  S3E, SOD, SCD, S5A, SBB, S18, SCA,  SFE, S58, S28, 

S21,  S57,  SCD,  S62,  SC8,  S5F,  1915 

1350  DATA  SCD, S98, SC8, S7A, SCD, S5A, SBB, S7B, SCD, S5A, 

SBB, SCD, SBC, SC8, S77, S23,  2513 

1360  DATA  S3E, SOA, SCD, S5A, SBB,  S3E, SOD, SCD, S5A,  SBB, 
S16,SA5, S01.SE8,  SB4,  SAF,  1888 

1370  DATA  S02,  SC9,  SE5,  SD5, SCD, S81 , SBB, SCD, S7B, SBB, 

SCD,  S18, SBB, SF5, SCD, S7E,  2673 

1380  DATA  SBB , SCD,  S84 , SBB, SF1 , SD1 , SEI , SC9 , SE5 , S2 1 , 

SDC, SC7, S7B, SCD, SBO, SC8,  2972 

1390  DATA  S28, S02, SIE, S30, S21, SDC, SC7, S7A, SCD, SBO, 

SC8,  SEI,  SC8, S16, S30, SC9,  1971 

1400  DATA  S06,  S10,  SBE,  SC8,  S23,  S05,  S20,  SFA,  S3E,  SFF, 

SB7 , SCO , SE5 , S2 1 , SDC , SC7 ,  2116 

1410  DATA  S7B,  SCD,  SD8,  SC8, S58, S21, SDC,  SC7,  S7A,  SCD, 

SD8 ,  SC8 ,  S50 ,  S7  A ,  S07 ,  S07 ,  2243 

1420  DATA  S07,  S07,  S57,  SAF, SB2, SB3, SEI, SC9, S06, SOO, 

SBE,  SCB,  S23,  S04,  S18,  SFA,  1768 

1430  DATA  SOA, SOD, S41 , S64, S72, S65, S73 , S73 , S65, S20, 

S7A, S75, S20, S6B, S6C, S65,  1353 

1440  DATA  S69 ,  S6E, S20 , S21 , S21 , S21 , SOA, SOD, SOO, S52 , 

S41, S4D, S20, S4D, S6F.S64,  913 

1450  DATA  S69 , S66 , S69, S6B, S61 , S74 , S69 , S6F, S6E, S20, 

S3A,  S20,  Sil, S64, S72, S65,  1460 

1460  DATA  S73, S73, S65, S20, S2F, S20, S41 , S6C, S74 , S20, 

S2F, S20, S4E, S65, S75, SOA,  1148 

1470  DATA  SOD, S3C, S58, S3E, S20, S3A, S20, S45, S6E, S64, 

S65,  S20,  S2F, S20, S3C, S45,  965 

1480  DATA  S63, S74, S65, S72, S3E, S20, S3A, S20, S41 , S6C, 

S74 , S3D, S4E, S65, S75, SOA,  1281 

1490  DATA  SOD,  SOA,  SOD,  SOO,  SFE,  S03,  SC2,  S5'.',  SC4,  SDD, 

S6E, S04.SDD, S66, S05.SE5,  1662 

1500  DATA  SOI , S7 0 , SOI , S37, S3F, SED, S42 , SEI , S30, S06, 

S21 , SEO , SC8 , SC3 , SBC,  SCI ,  1799 

1510  DATA  SDD,  S4E, S02, SDD, S46 , S03 , SDD, S7E, SOO, S77, 

S23,  SOB,  S78,  SFE,  SOO,  S20,  1513 

1520  DATA  SF5,  SB9,  SC8, S18, SF1, SFE, SOI, SC2, S57, SC4, 

S21, SA4, SAC, S06, SFF, SAF,  2432 

1530  DATA  S77 , S23, S10,  SFC,  S21 ,  SA4 ,  SAC,  SCD,  S3A,  SBD, 

S21 , SA4, SAC, SDD, S5E, SOO,  1927 

1540  DATA  SDD,  S56,  SOI ,  S7E,  S12 , SB7 , SC8 , S13 , S23 , S18 , 

SF8 , SFE , S03 , SC2 , S57 , SC4 ,  1895 

1550  DATA  S3E, S02, SCD,  SOE,  SBC,  S21,  SEO, SC9, SCD,  S8C, 

SCI, SFD, S21, SOO, SOO, SCD,  1958 

1560  DATA  S09, SB9, SDD, S6E, S04, SDD, S66, S05, SDD, S4E, 

S02, SDD, S46, S03, SDD, S7E,  1799 

1570  DATA  SOO, SED, SA1 , SCC, SCF, SC9 , S78 , SFE, SOO, S20, 

SF3, SB9 , SC8, S18, SEF, SC5,  2504 

1580  DATA  SE5, S2B, S1 1 , SOF, SOO, S19, SBB, SEI , SB5, S2B, 

SCD,  S05,  SC7, SEI, SCI, SC9,  2089 

1590  DATA  S53 ,  S75, S63, S68, S65, S20, S69, S6D, S20, S52, 

S41, S4D, S20, S3A, S20, S41,  1193 

1600  DATA  S64,  S72,  S65,  S73,  S73,  S65,  S20,  S2F,  S20,  S42, 

S79,  S74  ,  S65,  S73,  S20,  S2F,  1355 

1610  DATA  S20, S41, S53, S43, S49, S49, S20,  SOA,  SOD,  SOA, 

SOD, SOO,  SDD, S6E, SOO,  SDD,  1023 

1620  DATA  S66,  SOI, SDD, S4E, S02, SDD, S56, S04, SDD, S5E, 

S06 , SC9 , SFE , S04 , SC2 , S57 ,  1776 

1630  DATA  SC4 ,  SCD,  SOC,  SCA, SDF, S28, SCA, SC9, S66, SC6, 

S07 , SFE, S04 , SC2, S57, SC4,  2323 

1640  DATA  SCD,  SOC, SCA, SDF, S37, SCA, SC9, S4E,  SC6, S07, 

SC9, S62, SCA, SE5, S3E, S02,  2177 

1650  DATA  SCD, SOE, SBC, SEI, SCD, S4E, SCA,  SE5,  SCD,  S18, 

SBB, SEI , S18 , SEF, S06, S18,  2280 

1660  DATA  S7E,  SFE,  SOD,  S20,  S02,  S05,  SC8,  SB7,  S20,  S02, 

SEI,  SC9,  SCD, S5A, SBB, S23,  1792 

1670  DATA  S18, SEE, S20, S20, S20, S20, S20, S20, S20, S20, 

S20,  S20,  S20,  S20,  S20,  S20,  710 

1680  DATA  S20, S20, S20, S20, S20, S20, S20, S20, S20, S20, 

S20,  S44,  S69,  S65,  S20,  S42,  724 

1690  DATA  S41 , S53, S49, S43, S20, S2D, S20, S45, S72, S77, 

S65,  S69, S74, S65, S72, S75,  1353 

1700  DATA  S6E, S57, S20, S52, S4F, S4D, S53, S4F, S46, S54, 

SOD, SOA, SOD, SOA , S20 , S20,  909 

1710  DATA  S20, S20, S20, S20, S20, SOO, SOO, SOO, SOO,  SOO, 

SOO, SOO, SOO, SOO, SOO, SOO.  160 
1720  DATA  SOO,  0 
1730  dot=0  :  ez=0  :  dz  =  10 
1740  FOR  adr  =  16384  TO  19120 
1750  READ  byte  :  dat=dat+l 
1760  sz=sz+byte 
1770  POKE  adr, byte 

1780  IF  dat  <  16  ARD  adr  <  19120  THEN  1820 

1790  READ  chksum 

1800  IF  chksumOsz  THER  PRIST  "Fehler  in  Zeile  : 

“ ;  dz 

1810  dz=dz  +  10  :  ez=0  :  dat=0 
1820  REXT  adr 
1830  ERD 
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CPC 464, 664  +  6128  Software 


STAR-WRITER I 

Das  zur  Zeit  mit  Abstand  leistungsfähigste  Textsystem  für  den  CPC,  das  völlig  neue  Maßstäbe 
in  Bedienung  und  Leistung  setzt! 


•  Einfache  Bedienung  durch  PULL-DOWN  Menues 

•  Deutsche  DIN-Tastatur  mit  Aufkleber 

•  Integrierte  Adreßverwaitung  im  Direktzugriff 

•  Integriertes  Grafikprogramm  zur  Erstellung  von  Brief¬ 
köpfen 

•  Integriertes  DFÜ-Programm  für  die  Schneider-Schnitt¬ 
stelle 

S  Integrierter  Zeicheneditor  zur  Erstellung  von  1 0  Zei¬ 
chensätzen 

•  Anpaßbar  an  jeden  Drucker  der  auf  dem  Markt  erhält¬ 
lich  ist 

•  Integrierte  Tabellenkalkulation  im  Textprogramm 

•  Basicprogramme  können  eingelesen  und  bearbeitet 
werden 

•  Komfortable  Diskettenverwaltung  (löschen,  kopieren, 
umbenennen.. .) 

•  Ränder  frei  wählbar 

•  Trennvorschläge 

•  Zentrieren 

•  Formatierte  Ausgabe  auf  dem  Bildschirm 

•  Umfangreiche  Blockoperationen 

•  Umformatieren  auf  andere  Formate 

•  Zeichen  einfügen  und  löschen 

•  Zeilen  einfügen  und  löschen 

•  Absätze  einfügen  und  löschen 

•  Kopf-  und  Fußzeilen  frei  änderbar 

•  Blocksatz 

•  Flattersatz 

•  Suchen  und  Ersetzen 

•  Serienbrieffunktion 

•  „MERGE“-Funktion 

•  Fließtexteingabe 

•  Wordwrap 


Jetzt 

Version  2.0 


A  ch  tung  an  alle  Vortex- A  n  wender! 

Ab  sofort  alle  Programme  auf  51/,  Zoll  Dis¬ 
ketten  unter  VDOS  2.0  lieferbar. 

Die  hohe  Speicherkapazität  und  alle 
anderen  Vorzüge  des  Laufwerks  werden 
von  den  Programmen  voll  ausgenutzt! 


•  Bausteinverarbeitung 

•  9  verschiedene  Layouts 

•  Proportionalschrift 

•  Hervorhebungen  wie:  Unterstreichen,  Fettdruck,  Dop¬ 
peldruck.  Kursiv,  doppelte  Breite,  Schmalschrift,  NLQ . . 

•  Mathematische  Formelschreibweise  (Hoch-  und  Tief¬ 
stellen) 

•  Definierte  Zeichensätze  können  auf  entsprechendem 
Drucker  ausgegeben  werden  (z.  B.  Russisch  oder  Fran¬ 
zösisch). 


Software  des  Jahres  Platz  3 

STAR-WRITER  I,  ein  Textsystem  der  Superlative, 
wurde  schon  nach  einem  Monat  Marktanwesenheit 
bei  der  Wahl  zur  Software  des  Jahres  auf  den  drit¬ 
ten  Platz  gewählt.  Diese  Wahl  bestätigt  den 
Anspruch  von  STAR-WRITER  I,  ein  Textsystem  der 
Superlative  zu  sein,  völlig.  Sollten  Sie  noch  an  STAR- 
WRITER  I  zweifeln,  fordern  Sie  unser  kostenloses  In¬ 
formationsmaterial  an 


COPY-STAR II 

ist  die  ideale  Befehlserwei¬ 
terung  für  Druckerbesitzer, 
denn  es  stellt  für  alle  gängi¬ 
gen  Drucker  Hardcopyfunk¬ 
tionen  in  verschiedenen 
Größen  zur  Verfügung.  So¬ 
gar  Farbbilder  lassen  sich 
schattiert  ausgeben. 
COPY-STAR  II  können  Sie 
leicht  in  eigene  Programme 
einbinden. 

Preis:  29,90  Kassette 
39,90  Diskette 

_ _ _ 


STATISTIC-STAR 

Eine  Grafik  sagt  mehr  als  1 0OO  Zahlen 

Ein  professionelles  Grafik-  und  Statistic- 
programm  zum  Auswerten  von  Daten  aller 
Art  (Schule,  Studium,  Beruf.  Hobby,  Haus¬ 
halt...). 

•  Linien-,  Balken-  und  Tortengrafik 

•  Betiteln  von  Grafiken 

•  400  Daten  direkt  im  Speicher 

•  Umfangreiche  Editierfunktionen 

•  Umfangreiche  statistische  Berechnungen 

•  Hardcopyfunktion  u.v.m. 

•  Preis:  59,90  Kassette 

79,90  Diskette 


Beispielgrafik  STATISTIC-STAR 


MATHE-STAR 

Vom  Lehrer  für  Schüler! 

•  Lin.  Gleichungssysteme 

•  Gleichungen  4.  Grades 

•  Bruchrechnen 

•  Primfaktorzerlegung 

•  Polynome 

•  Kurvendiskussion 

•  Integralrechnung 

•  Vektorrechnung 

•  Matrixrechnung 
etc. 


Preis:  69,90  Kassette 
79,90  Diskette 


DISKSORT-STAR 

Leistungsstarke  Disketten¬ 
verwaltung,  die  keinem 
CPC-Benutzer  fehlen  sollte. 
DISKSORT-STAR  verwaltet, 
archiviert,  katalogisiert, 
druckt  ..  Ihre  Disketten¬ 
sammlung  auf  einfachste 
Weise.  Neben  der  reinen 
Diskettenverwaltung  ist  un¬ 
ter  anderem  noch  ein  kom¬ 
pletter  Diskettenmanager 
enthalten! 

Auch  in  punkto  Bedienung 
ist  DISKSORT-STAR  kaum 
zu  schlagen 

DM49,90 


STAR-MOH 

Das  Entwicklungssystem 
für  Profis  und  Anfänger 

•  Assembler 

•  Editor 

•  Disassembler 

•  Monitor 

•  4  Breakpoints 

•  Trace-Funktion 

•  Bankswitch 

•  Memory  Dump 

•  Diskettenmonitor 

•  u.v.m. 

Preis:  59,90  Kassette 
79,90  Diskette 
(erweiterte  Version) 

t _ Sl 
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CREATOR-STAR 

Ein  Trickfilmdesigner  für  Ihren  CPC 

und  alle  Hobbyregisseure! 

•  Sprite-Designer 

•  Laufschrift 

•  Utilities 

•  Kulissendesigner 

•  Sprites  mit  4  Unter¬ 
positionen 

•  Verbinden  von  Sprites 

•  Kulissen  auch  überein- 
andergelegt 

•  Eigene  Programmier¬ 
sprache  mit  Editor 
und  Compiler 

DM  49,90  Diskette 

- 
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JOYCE + JOYCE  plus  Software 
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DATEI  STAR 


(464  /  664  /  61  28  /  JOYCE) 

Das  universelle  Dateiverwaltungsprogramm  im 
Direktxugriff! 


Einfache  Bedienung  durch  PULL-DOWN  Menues 
Frei  definierbare  Eingabemaske  mit  30  Datenfeldern 
1400  Zeichen  pro  Datensatz! 

Frei  definierbare  Eingabe-,  Such-  und  Druckmaske 
Suchen  und  Selektieren  nach  allen  Feldern 
gleichzeitig 

Umfangreiche  Sortierfunktionen  und  Erstellung  einer 
Pointerdatei! 

Integrierte  Kalkulationsmöglichkeiten  (Rechenfelder) 
Schnittstelle  zu  STAR-WRITER  I 
(nur  CPC) 

Integrierter  Reportgenerator  u.  v.  m. 

Preis  98,—  DM 


STAR-MAIL  (nur  für  JOYCE) 

Die  Schnittstelle  zur  Außenwelt 

für  alle  JOYCE-Benutzer! 

•  Automatische  Serienbrieferstellung  in  Verbindung  mit 
Locoscript  und  Datei-Star  Alle  Daten  aus  DATEI-STAR 
können  beliebig  in  Locoscript-Texte  eingebaut  und 
verwendet  werden. 

•  Endlich  können  Locoscript-Texte  mit  fremden  Druckern, 
sogar  Typenradschreibmaschinen,  verarbeitet  wer¬ 
den.  Hierbei  ist  zu  beachten,  daß  original  Locoscript- 
Texte  mit  allen  Steuerzeichen  verwendet  werden,  und 
nicht  wie  bei  anderen  Programmen  umgewandelte 
ASCII-Dateien! 

•  Komplette  Unterstützung  der  Centronics-  &  RS  232 
Schnittstelle 

•  Jeder  Drucker  kann  mit  Hilfe  einer  einfachen  Anpas¬ 
sung  verwendet  werden! 

•  DATEI-STAR  &  STAR-MAIL  gibt  es  im  Paket  als 
JOYCE-MAILING-SYSTEM  für  nur  189,—  DM. 

•  Preis:  98,—  DM 


FIBU-STAR  Plus 

(Joyce,  61 28  oder  664  und  464  mit  Speichererw  ) 

Endlich  gibt  es  eine  professionelle  Finanzbuchhal¬ 
tung  für  die  SCHNEIDER-Computer! 


•  Stammdatenverwaltung  und  Umsatzsteuervoranmel¬ 
dung 

•  Frei  wählbarer  Umsatzsteuerschlüssel  zur  automati¬ 
schen  Ermittlung  der  Steuerbeträge  und  deren  Ver¬ 
buchung  auf  den  Mehrwert-  und  Vorsteuerkonten 

•  Frei  wählbarer  Kontenrahmen  (bis  zu  400  Konten) 

•  Frei  wählbare  Zuordnung  der  Sach-  und  rechnenden 
Konten 

•  Buchungsjournal,  Kontenblätter  und  Jahresabschluß 

•  Summen-  und  Saldenlisten  der  Kreditoren,  Debitoren 
und  Sachkonten 

•  Einfaches  Erfassen  aller  Buchungsbelege  mit  oder 
ohne  Protokoll 

•  Buchungen  können  so  durchgeführt  werden,  wie  sie 
auf  den  Tisch  kommen,  da  alle  Buchungen  chronolo¬ 
gisch  und  innerhalb  eines  Datums  nach  Belegnum¬ 
mern  sortiert  werden 

•  Einfache  Bedienung  und  hohe  ABSICHERUNG  gegen 
Bedienungsfehler 

•  Preis  298,- DM 

Das  Programm  FIBU-STAR  Plus  ist  erstmals  unter  dem 

Namen  FIBU-M  1 980  installiert  worden  und  hat  sich  seit¬ 
dem  sehr  oft  in  der  Praxis  bewährt. 


STAR-BASE 

STAR-BASE  ist  ein  anwenderfreundliches  Datenbank¬ 
system  mit  unglaublichen  Fähigkeiten! 

•  Eigener  Window-Manager 

•  Menueorientierte  Bedienung  und  Programmierung 

•  Volle  Unterstützung  des  JOYCE-Bildschirms 

•  Eingabemaske  über  9  Bildschirmseiten 

•  100  Datenfelder  pro  Eingabemaske 

•  88  Zeichen  pro  Datenfeld 

•  2060  Zeichen  pro  Datensatz 

•  Max  8  Zugriffsschlüssel 

•  Komplette  Indexverarbeitung 

•  Suchen  u.  Selektieren  nach  allen  Datenfeldern 

•  32767  Datensätze  pro  Datei 

•  Verknüpfung  von  mehreren  Dateien 

•  Zu  jedem  Datensatz  kann  eine  Unterdatei  mit  max.  255 
Zeichen  pro  Satz  angelegt  werden 

•  Kompletter  Reportgenerator 

•  Star-Base  arbeitet  voll  mit  Locoscript  zusammen 

•  Umfangreiche  Rechenfunktionen 

•  Serienbrieferstellung 

•  Integrierter  Texteditor 

•  Direkter,  menuegesteuerter  Datensatzzugriff 

•  Mehrspaltige  Formulare 

•  Eigener  Menuegenerator 

•  Einfachste  Maskendefinition 

•  Passwort  für  eine  Datei 

•  Ausführliches  Handbuch 

•  Preis:  198,— DM  ink\.  Diskette  u.  Handbuch 
Weitere  Informationen  zu  STAR-BASE  und  zu  unseren  an¬ 
deren  JOYCE-Programmen  finden  Sie  in  unserem  neuen 
JO  Y  CE-Kataiog ! 


Weitere  interessante  Programme  finden  Sie  in  unserem  ausführlichen  Katalog! 
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Vertrieb  für  die  Schweiz: 

I^CS  Video-Computershop 
Schaffhauserstraße  473 

P.O  Box  103,  CH-8052  Zürich 
Telefon  01  /3022600 

Händleranfrage 

erwünscht 

Software- Autoren 
gesucht 

Vertrieb  für  Österreich: 

Ueberreuter-Media 

Alserstraße  24,  A-1091  Wien 
Telefon  4  81  5380 

Unsere  Produkte  sind 
in  allen  führenden 
Computer-Shops 
sowie  bei  Karstadt 
und  Brinkmann 
erhältlich! 

a 

□  Senden  Sie  mir  unverbindlich  Ihren  Katalog 

□  6128  D  664  D  464  □  JOYCE 

□  Hiermit  bestelle  ich  per  Vorkasse/Nachnahme 

Vorname  - - 


Name 

Straße 

Wohnort 


Datum /Unterschrift 


(Alle  Preise  verstehen  sich  als  unverbindliche 
Preisempfehlungen  zzg.  5. —  DM  Porto  und 
Verpackung)  CPC-D-786 


Kurse . 

Pascal 

Zum  Schluß  des  letzten  Teiles  dieses 
Kurses  äußerte  ich,  daß  noch  ein  wenig 
mehr  zu  den  skalaren  Datentypen  zu 
sagen  wäre,  ich  aus  Platzmangel  aber 
darauf  verzichten  mußte.  Deshalb  hier 
-  bevor  es  mit  Ausdrücken  und  An¬ 
weisungen  weiter  geht,  der  vorläufige 
Abschluß  dieser  Sektion. 

Aus  diesem  letzten  Teil  kennen  wir 
also  die  Pascal  zugrunde  liegenden 
skalaren  Datentypen  INTEGER, 
REAL,  CHARacter  und  BOOLEAN. 
Ebenso  die  mit  diesen  Typen  mögli¬ 
chen  Operationen.  Wie  wir  schon  aus 
Teil  2  wissen,  muß  eine  jede  Größe  in 
Pascal,  bevor  sie  das  erstemal  in 
einem  Programm  verwendet  wird,  de¬ 
finiert  werden.  In  den  zwei  Bei¬ 
spielprogrammen  des  2.  Teiles  sind 
auch  einfache  Variablen-Vereinba- 
rungen  enthalten.  Doch  betrachten 
wir  uns  die  Definition  von  Datenty¬ 
pen  noch  mal  kurz  genauer:  Bei  der 
Verwendung  von  Konstanten  im  An¬ 
weisungsteil  oder  der  Deklaration 
derselben  (CONST)  im  Vereinba¬ 
rungsteil  ergibt  sich  der  Typ  einer 
Konstanten  implizit  durch  den  ange¬ 
gebenen  Wert.  So  handelt  es  sich  z.B. 
bei  der  Zahl  4321  um  eine  INTE- 
GER-Zahl,  0.14  ist  eine  REAL-Zahl 
und  'XYZ123?'  ist  eine  Zeichenket- 
ten-Konstante. 

Bei  der  Deklaration  von  VARiablen 
wird  der  Datentyp  explizit  angege¬ 
ben.  Der  Compiler  kann  ja  schließ¬ 
lich  nicht  erahnen,  welchen  Typ  die 
Daten  besitzen,  die  der  Programmie¬ 
rer  später  in  diese  Variablen  packen 
will.  In  den  Beispielen  wurden  meh¬ 
rere  Variablen  des  gleichen  Typs 
deklariert,  indem  sie  durch  Kommas 
getrennt  aufgeführt  wurden.  Der  letz¬ 
ten  Variablen  folgte  dann  ein  Dop¬ 
pelpunkt  und  der  gewünschte  Daten¬ 
typ.  Man  hätte  aber  auch  jede  ein¬ 
zelne  Variable  für  sich  deklarieren 
können.  Dies  sei  hier  erwähnt,  da  je 
nach  Stil  und  Übersichtlichkeit  die 
eine  oder  andere  Form  bevorzugt 
wird.  Ebenso  ist  die  Reihenfolge 
gleichgültig,  mit  der  die  Variablen  mit 
den  unterschiedlichen  Typen  defi¬ 
niert  werden. 

Zusätzlich  zur  Verwendung  der  vor¬ 
gegebenen  Standard-Datentypen  be¬ 
steht  noch  die  Möglichkeit,  für  diese 
Datentypen  andere  Namen  zu  ver¬ 
wenden  oder  gänzlich  neue  Datenty¬ 
pen  zu  'kreieren'.  Die  richtige  Ver¬ 
wendung  solcher  benutzerdefinierter 
Datentypen  kann  sehr  zur  Selbstdo¬ 
kumentation  von  Programmen  bei¬ 
tragen.  Zum  Beispiel  könnte  man  in 


. . . . . . III  Ulli . Illll 

einem  Programm  zur  Auswertung 
von  Leistungen  irgendeiner  Art 
(Sport,  Schule  etc.),  bei  denen  zur  Be¬ 
wertung  Punkte  vergeben  werden,  va¬ 
riable  Größen  wie  gesamt,  bonus, 
straf  einfach  als  INTEGER-Größen 
deklarieren: 

VAR  gesamt,bonus,straf:INTEGER; 
Alternativ,  und  auch  bei  kleineren 
Programmen  ratsam,  kann  man  aber 
einen  neuen  Datentyp  einführen  - 
den  Typ  punkte: 

TYPE  punkte  =  INTEGER; 
und  die  Variablen  mit  diesem  Typ 
definieren: 

VAR  gesamt, bonus, Strafpunkte; 

Im  ersten  Moment  mag  es  zwar  wenig 
sinnvoll  erscheinen,  einen  existieren¬ 
den  Datentyp  einfach  umzubenen¬ 
nen.  Allerdings  erlaubt  Pascal  hier, 
wie  gesagt,  noch  wesentlich  mehr. 
Aber  auch  dieses  kleine  Beispiel  hilft 
bei  der  Programmerstellung  und  -  do- 
kumentation. 

Besonders  hilfreich  wird  es,  wenn  der 
neue  Datentyp  nur  einen  gewissen 
Wertebereich,  also  eine  Teilmenge 
eines  Datentyps  oder  ein  paar  be¬ 
stimmte  Werte  umfaßt.  Zum  Beispiel 
könnte  der  Wertebereich  des  Daten- 
types  punkte  mit: 

TYPE  punkte  =  -100..  100; 

(lies:  -100  bis  100)  eingeschränkt  wer¬ 
den.  Eine  Unter-  oder  Überschrei¬ 
tung  dieses  Teilbereiches  bei  Opera¬ 
tionen  mit  Variablen  des  Typs  punkte 
würde  zu  einem  Fehler  führen.  Ein 
anderes  Beispiel: 

TYPE  tage  =  1-31; 

Hierbei  können  Variablen  des  Types 
tage  keinen  Wert  kleiner  1  und  größer 
31  annehmen.  Unsinnige  Werte  (z.B.: 
35.  Septober)  können  nicht  auftreten, 
da  Pascal  die  Einhaltung  solcher 
Teilbereiche  überwacht. 


Reihenfolge: 


Bei  den  meisten  Pascal-Implemen¬ 
tationen  muß  die  Vereinbarung  der 
Konstanten,  vom  Benutzer  definierte 
Datentypen  und  Variablen  in  einer 
festen  Reihenfolge  vorgenommen 
werden.  Als  erstes  müssen  die  Kon¬ 
stanten  definiert  werden,  falls  not¬ 
wendig.  Das  Schlüsselwort  CONST 
leitet  dieses  ein  und  der  Compiler  er¬ 
wartet  solange  Konstantendefinitio¬ 
nen  der  Art: 

konstname  =  wert; 
bis  die  Konstantenvereinbarung  durch 
ein  anderes  Schlüsselwort  aufgeho¬ 
ben  wird.  Danach  können  die  eige¬ 
nen  Datentypen  definiert  werden, 
eingeleitet  durch  TYPE.  Als  vorerst 
letztes  im  Vereinbarungsteil  werden 


dann  die  nötigen  Variablen  dekla¬ 
riert,  eingeleitet  mit  dem  Schlüssel¬ 
wort  VAR. 


Baukastenprinzip... 


Doch  wenden  wir  uns  nun  einem  zur 
Verarbeitung  der  kennengelernten 
Datentypen  ohne  Zweifel  ebenso 
wichtigen  Teil  von  Pascal  zu:  dem 
'Arbeitstier'  bzw.  dem  'Anweisungs- 
teif  oder  'Programm körper. 

In  diesem  sollen  die,  aus  welchen 
Gründen  auch  immer,  angefallenen 
Daten  mit  Hilfe  von  Operationen  so 
verarbeitet/manipuliert  werden,  daß 
als  Ergebnis  auch  etwas  Brauchbares 
herauskommt.  Wie  die  Bezeichnung 
'Anweisungsteif  treffend  ausdrückt, 
befinden  sich  hier  die  zur  Verarbei¬ 
tung  der  Daten  und  zur  Steuerung  des 
Programmes  nötigen  Anweisungen. 
Fangen  wir  aber  bei  der  elementar¬ 
sten  Einheit  des  Anweisungteiles  an, 
da  diese  in  jedem  (sinnvollen!?) 
Programm  ausgiebig  auftreten  und 
gut  verstanden  werden  wollen: 


...  die  Ausdrücke. 


Aus  der  Mathematik  kennen  wir 
di^se  bzw.  so  ähnlich  Ausdrücke 
schon.  Ganz  einfach  beschrieben,  be¬ 
stehen  Ausdrücke  aus  einer  Reihe 
von  Elementen  (Daten),  die  durch 
Operatoren  (zur  Erinnerung  s.  Teil  3) 
verknüpft  werden: 

-2 

14-2+3+4 
47 11* 123/x 
a+b-c/2 

Es  sei  noch  einmal  darauf  hingewie¬ 
sen,  daß  in  Pascal  die  mit  einem  Da¬ 
tentyp  ausführbaren  Operationen 
von  diesem  Typ  abhängig  sind.  Für 
einen  Ausdruck  ergibt  sich  daraus 
automatisch,  daß  in  ihm  nur  Daten 
des  gleichen  Typs  enthalten  sein  dür¬ 
fen.  So  können  auf  Grund  der  Stan¬ 
dardtypen  für  z.B.  arithmetische  Aus¬ 
drücke  nur  zwei  Arten  auftreten: 
Ganzzahlige  Ausdrücke,  in  denen 
nur  ganze  Zahlen  benutzt  werden 
dürfen,  und  reelle  Ausdrücke,  in  de¬ 
nen  entsprechend  nur  reelle  Zahlen 
auftreten  dürfen.  Bei  letzteren  gibt  es 
allerdings  eine  Ausnahme  -  es  dürfen 
auch  ganze  Zahlen  Vorkommen,  da 
diese  bei  Bedarf  in  reelle  Zahlen 
umgewandelt  werden  (z.B.  wird  aus  2 
die  reelle  Zahl  2.0). 

Bleiben  wir  noch  ein  wenig  bei  den 
arithmetischen  Ausdrücken.  Ebenso 
ist  die  Regel  "Punktrechnung  geht 
vor  Strichrechnung’'  und  die  Mög- 
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lichkeit  des  "Klammerns"  aus  der 
Mathematik  bekannt.  Diese  Regeln 
befolgt  auch  Pascal  bei  der  Auswer¬ 
tung  von  Ausdrücken: 

8-2*3 

wird  folgendermaßen  ausgewertet: 

1.  2*3  =  6,  also  zuerst  Punktrech¬ 
nung. 

2.  8-6  =  2,  dann  Strichrechnung, 
oder 

8+ 5-2*3 

Auswertung: 

1.  2*3  =  6,  wie  oben 

Der  Ausdruck  lautet  nun: 

8+5-6 

und  enthält  nur  noch  Operatoren 
gleicher  Priorität'.  Solche  Ausdrücke 
werden  nun  einfach  von  links  nach 
rechts  ausgewertet: 

2.  8+5  =  13 

3.  13-6  =  7,  fertig! 

Und  wenn  man  die  Punkt-vor-Strich- 
Regel  umgehen  muß?  Klammern! 
(8+5-2)*3 

Was  kommt  raus?  33? 


Ausdrücke  und  Funktionen 


Bis  jetzt  haben  wir  in  unseren  Aus¬ 
drücken  nur  Konstanten,  Variablen 
und  die  nötigen  Operatoren  benutzt. 


Was  ist  aber  mit  den  Standardfunktio¬ 
nen  des  letzten  Teils?  Sehen  wir  uns 
dies  anhand  folgenden  Ausdruckes 
an: 

ax2+bx+c 

Mil  dem  jetzigen  Stand  unseres  Wis¬ 
sens  kann  man  diesen  Ausdruck  in 
Pascal  so  schreiben: 

a*(x*x)+b*x+c 

Warum  die  Klammern?  Da  Punkt¬ 
rechnungen  vor  Strichrechnungen 
ausgeführt  werden,  werden  bei  weg¬ 
gelassenen  Klammern  zuerst  die  zwei 
Teilausdrücke: 

1)  a*x*x 
und 

2)  b*x 

ausgewertet,  da  die  Multiplikations¬ 
operatoren  die  größere  Vorrangigkeit 
gegenüber  den  Additionsoperatoren 
besitzen.  Die  Ergebnisse  der  Teilaus¬ 
drücke  werden  dann  zu  c  addiert. 
Den  erste  Teilausdruck  wertet  Pascal 
wegen  den  gleichrangigen  Operato¬ 
ren  von  links  nach  rechts  aus. 

Also  zuerst: 

a*x 

Das  daraus  resultierende  Ergebnis 
wird  dann  nochmal  mit  x  multi¬ 
pliziert.  Dies  entspricht  aber  keines¬ 
falls  dem  Ausdruck  ax2! 

Durch  die  Klammern  wird  dies  korri¬ 
giert:  zuerst 


x*x  (=x2) 

und  dann  das  Ergebnis  mal  a. 

Nun  stellt  Pascal  aber  die  Stan¬ 
dardfunktion  SQR(x)  zur  Verfügung, 
welche  das  Quadrat  des  Arguments  x 
ermittelt.  Also  ersetzen  wir  unseren 
Klammerausdruck  und  schreiben 
einfach: 

a*  SQR(x)+b*x+c 

Wie  wir  sehen,  kann  man  Funktionen 
in  einem  Ausdruck  überall  dort  ein- 
setzen,  wo  sonst  eine  Konstante  oder 
Variable  steht.  Allerdings  ist  dabei 
einiges  zu  beachten: 

Das  Ergebnis,  welches  die  Funktion 
liefert,  muß  zum  Datentyp  der  Kon¬ 
stanten  oder  Variablen,  an  deren 
Stelle  sie  eingesetzt  wurde,  passen. 
Befindet  sich  die  Funktion  zum  Bei¬ 
spiel  in  einem  ganzzahligen  Aus¬ 
druck,  so  muß  sie  auch  ein  ganzzahli¬ 
ges  Ergebnis  liefern!  Ebenso  ist  auf 
den  Datentyp  des  Funktionargu¬ 
ments  (Operand)  zu  achten,  wobei 
der  Datentyp  des  Funktionargu¬ 
ments  nicht  unbedingt  der  gleiche 
Datentyp  wie  der  des  Ergebnisses 
sein  muß. 

Beispiel: 

Sei  die  Variable  x  als  Integer-Größe 
vereinbart.  Der  Aufruf  der  Stan- 
dardfunktion  Sinus  kann  mit  einem 
ganzzahligen  oder  reellen  Werl  als 
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Funktionsargument  geschehen.  Bei 
sin(x)  in  diesem  Beispiel  also  mit 
einer  ganzen  Zahl.  Der  Datentyp  des 
Ergebnisses  dieser  Funktion  ist  aber 
auf  jeden  Fall  eine  reelle  Zahl.  Die 
Funktion  kann  also  nur  in  einem 
reellen  Ausdruck  verwendet  werden. 
Soll  sie  aber  doch  in  einem  ganz¬ 
zahligen  Ausdruck  zum  Zuge  kom¬ 
men,  so  muß  ihr  Ergebnis  irgendwie 
in  eine  ganze  Zahl  umgewandelt  wer¬ 
den  -  zum  Beispiel  mit  der  ROUND- 
Funktion.  Diese  hat  als  Argument 
immer  einen  reellen  Wert  und  liefert 
den  ganzzahlig  gerundeten  Wert  als 
Ergebnis. 

In  einem  ganzzahligen  Ausdruck 
könnte  die  Verwendung  der  Sinus- 
Funktion  demnach  so  aussehen: 

ROUND(SIN(x))+y+z 
Dabei  sind  die  Variablen  x,  y  und  z 
vom  Datentyp  Integer;  ebenso  das  Er¬ 
gebnis  von 

ROUND(SIN(X)) 

Wie  man  leicht  erkennt,  muß  man  bei 
dieser  Angelegenheit  'höllisch'  auf¬ 
passen  und  genau  wissen,  was  man 
mit  seinen  Daten  anstellen  will! 

Mit  dem  jetzigen  Wissen  können  wir 
Daten  schon  'ganz  schön'  manipulie¬ 
ren  (oder  durcheinander  bringen?). 
Aber  irgendwie  muß  der  Ablauf  die¬ 
ser  Operationen  in  den  meisten  Fäl¬ 
len  von  Bedingungen  abhängig  ge¬ 
steuert  werden,  die  sich  während  der 
Programmausführung  einstellen.  Be¬ 
dingungen  -  das  bedeutet  Vergleiche. 
Und  Vergleichen  bedeuten  Boole¬ 
sche  Algebra  und 


Boolesche  Ausdrücke 


und  wahr  oder  falsch. 

Für  die  Konstruktion  Boolescher 
Ausdrücke  stehen  uns  die  bis  eben 
behandelten  arithmetischen  Aus¬ 
drücke,  die  Vergleichsoperatoren  =, 
<,>,  <=.  >=,  <>  und  die  logischen 
Operatoren  AND,  OR  und  NOT  zur 
Verfügung.  Fangen  wir  klein  an: 

In  der  Booleschen  Algebra  wird  nur 
mit  den  zwei  Wahrheitswerten  wahr 
(TRUE)  und  falsch  (FALSE)  gerech¬ 
net  (s.  Teil  3).  Schauen  wir  uns  ein 
paar  einfache  Boolesche  Ausdrücke 
an: 

a<>b 

Dies  ist  ein  Ausdruck  mit  einem  Ver¬ 
gleichsoperator  und  liefen  den  Wert 
TRUE,  wenn  a  und  b  unterschiedli¬ 
che  Werte  haben.  Dabei  können  die 
zwei  Variablen  vom  Typ  BOOLEAN 
oder  von  irgendeinem  anderen  Da¬ 
tentyp  sein;  als  Ergebnis  erhält  man 
immer  den  Wert  TRUE  oder  FALSE 
vom  Typ  BOOLEAN. 


aORb 

Hier  werden  zwei  Variablen  vom  Typ 
BOOLEAN  mit  dem  Booleschen 
Operator  OR  (ODER)  verknüpft.  Als 
Ergebnis  erhält  man  den  Wert  TRUE, 
wenn  mindestens  einer  der  zwei  Ope¬ 
ranten  a  oder  b  den  Wert  TRUE  hat, 
sonst  den  Wert  FALSE  (s.  auch  Teil 

3). 

NOTa 

Der  Wahrheitswert  der  Booleschen 
Variablen  a  wird  hier  negiert.  Hatte  a 
vorher  den  Wert  TRUE,  so  erhält  die 
Variable  den  neuen  Wert  FALSE. 
NOT  a  AND  b 

Hier  wird  zuerst  a  negiert  und  danach 
mit  b  undiert. 

(a=0)  OR  (a=T0) 

Hier  wird  die  numerische  Variable  a 
auf  Gleichheit  mit  0  oder  10  getestet. 
Entspricht  sie  einem  der  zwei  Werte, 
so  liefert  der  Ausdruck  den  Wert 
TRUE.  Hier  ist  auch  eine  zwingende 
Vorschrift  von  Pascal  bei  der  Bildung 
von  Booleschen  Ausdrücken  zu 
erkennen: 

Unterausdrücke  müssen  geklammert 
werden,  sofern  sie  nicht  mit  NOT  be¬ 
ginnen.  Bsp.: 

(x=y)  AND  (u+v=w)  OR  (c=d) 
Durch  die  Klammerung  von  Boole¬ 
schen  Ausdrücken  sind  'geschach¬ 
telte'  Konstruktionen  wie  bei  arith¬ 
metischen  Ausdrücken  möglich. 
Deshalb  ein  paar  Grundregeln  der 
Booleschen  Algebra: 

NOT(NOT  a) 
ist  äquivalent  mit  a. 

NOT(a  OR  b) 

mit  (NOT  a)  AND  (NOT  b) 

NOT(a  AND  b) 

mit  (NOT  a)  OR  (NOT  b) 

Jetzt  haben  wir  verhältnismäßig  viele 
Operanten,  die  wir  in  Ausdrücken  be¬ 
nutzen  können  (und  werden),  wie  ist 
aber  die  Reihenfolge  bzw.  Priorität 
derselbigen  bei  der  Auswertung 
durch  Pascal?  Hier  die  Hierarchie: 

-  Die  Klammern  stellen  den  Adel  dar 
und  lassen  sich  von  keinem  ande¬ 
ren  Operator  übertrumpfen. 

-  Das  Boolesche  NOT  folgt  in  der 
Rangordnung  auf  dem  Fuße. 

-  *,  /,  DIV,  MOD  und  AND  bilden 
den  Mittelstand. 

-  Die  Operatoren  +,  -  und  OR  haben 
auch  noch  Privilegien. 

-  Schließlich  bilden  die  Vergleichs¬ 
operatoren  =,  <,  >,  <=,  >=,  und 
<>  das  'gemeine'  Volk  und  müssen 
alles  über  sich  ergehen  lassen. 

Bei  der  Bildung  von  komplexen  Aus¬ 
drücken  sind  diese  Prioritäten  von 
immenser  Bedeutung;  allzuoft  entste¬ 
hen  dabei  Fehler.  Ein  Tip:  Droht  der 
Überblick  wegen  zuvieler-  Klammer¬ 
ebenen  in  einem  Ausdruck  ver1  'fein¬ 
zugehen,  so  sollte  -  ähnlich  w.j  bei 


der  schrittweisen  Auflösung  von  ma¬ 
thematischen  Gleichungssystemen, 
der  Ausdruck  in  kleinere,  über¬ 
schaubarere  Teilausdrücke  zerlegt 
werden  und  sich  über  mehrere  Pro¬ 
grammanweisungen  (kommt  gleich!) 
erstrecken. 

Resümieren  wir  noch  einmal: 

Ein  Ausdruck  kann  eine  einfache 
Konstante  oder  Variable  sein: 

5  a  -1  +b 

Nicht  möglich  ist  das  unmittelbare 
aufeinanderfolgen  zweier  Operato¬ 
ren  in  einem  Ausdruck  wie  bei: 

4*-8 

(4  multipliziert  mit  -8) 

Hier  müssen  Klammern  trennend 
einschreiten: 

4*(-8) 

Schließlich  kann  anstelle  jeder  Kon¬ 
stanten  oder  Variablen  ein  Funktions¬ 
aufruf  eingesetzt  werden,  z.B.: 
2*SIN(pi)+x 

wobei,  wie  gesagt,  auf  die  Verträglich¬ 
keit  der  Datentypen  geachtet  werden 
muß! 

Nun  können  wir  uns  'ausdrücken'; 
dem  Rechner  also  hinsichtlich  der 
Verknüpfung  von  Daten  unsere 
Wünsche  beibringen.  Und  weiter? 


Anweisungen 


werden  erteilt! 

In  Pascal  gibt  es  viele  verschiedene 
Anweisungsarten.  Von  diesen  haben 
wir  in  den  vergangenen  zwei  Bei¬ 
spielprogrammen  schon  ein  paar 
kennengelernt.  So  zum  Beispiel  die 
Anweisung: 

READLN(wert); 

Damit  wurde  eine  Eingabe  über  die 
Standard-Eingabeeinheit  Tastatur 
getätigt.  Es  ist  also  eine  Eingabean¬ 
weisung.  Das  Gegenstück  ist  die 
Ausgabeanw?eisung: 

WRITELN('Hallo'); 
die  die  Zeichenkettenkonstante 
Hallo  auf  das  Standardausgabegerät 
gibt  und  die  nächste  Schreibposition 
auf  eine  neue  Zeile  legt.  Mit: 

WRITELN(2*a+b); 
würde  das  Ergebnis  des  Ausdrucks: 
2*a+b 

ausgegeben.  Wiederum  zu  einer  an¬ 
deren  Art  gehören  folgende  Anwei¬ 
sungen: 
summe:=ü; 

ergebnis:— zahll  +  zahl2; 

Bei  diesen  handelt  es  sich  um 
Zuweisungen,  mit  der  einer  Varia¬ 
blen  ein  bestimmter  Wert  zugewiesen 
wird.  Dazu  wird  der  Ausdruck  rechts 
vom  Zuweisungsoperator  :=  ausge¬ 
wertet  und  der  ermittelte  Wert  der  Va¬ 
riablen  links  vom  Zuweriungsope- 
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Kurse 


rator  zugewiesen  (gespeichert).  Wie 
in  der  Einführung  schon  erwähnt, 
und  von  Programmieranfängern  in 
BASIC  auf  Grund  des  Gleichheits¬ 
zeichens  als  Zuweisungsoperator  oft 
mißverstanden,  hat  eine  Zuweisung 
mit  der  mathematischen  Gleichset¬ 
zung  nichts  zu  tun.  Wegen  der  zeitli¬ 
chen  Abfolge  des  Geschehens  sind 
Zuweisungen  folgender  Art  möglich 
und  sehr  oft  anzutreffen: 

i:=i+x; 

Hier  wird  zuerst  der  Ausdruck: 
i+x 

ausgewertet,  wobei  der  aktuelle 
Wert  der  Variablen  i  (z.B.  i=l) 
benutzt  wird.  Erst  wenn  der 
Ausdruck  fertig  abgearbeitet  worden 
ist.  wird  der  daraus  resultierente 
neue  Wert  der  Variablen  i 
zugewiesen!  Wenn  also  x  den  Wert  2 
und  i  den  Wert  1  vor  Ausführung  der 
Zuweisung  besaßen,  so  enthält  die 
Variable  i  danach  den  Werl  3  ( 1+2), 
während  der  Wert  der  Variablen  x 
unverändert  bleibt.  Die  Variable  i 
behält  nun  den  neuen  Wert  solange 
sie  existiert  oder  einen  neuen  Wert 
zu  gewiesen  bekommt. 

Auch  wenn  es  zunächst  unsinnig 
erscheint  -  es  gibt  in  Pascal  auch 
eine  leere  Anweisung,  in  der  rein, 
gar  nichts  passiert.  Diese  besteht 


nur  aus  dem  Anweisungen  trennen¬ 
den  Semikolon  und  sonst  keinen 
weiteren  Symbolen.  Bsp: 

monat:=10;; 

1.  Anweisung:  monat:— 10; 

2.  Anweisung:  ; 

Die  leere  Anweisung  wird  vom  Com¬ 
piler  einfach  überlesen,  so  daß  man 
auch  überflüssige  Semikolons  im 
Programm  haben  kann,  wie  im  fol¬ 
genden  Fall: 
monat:— 10; 

END. 

Vor  dem  END  braucht  kein  Semi¬ 
kolon  zu  stehen,  da  END  (ebenso 
BEGIN)  die  gleiche  Funktion  wie  das 
Semikolon  haben:  sie  dienen  als 
Trenn- Symbole  von  Anweisungen 
und  stellen  keine  solchen  dar. 


Block 


Bei  Pascal  handelt  es  sich  um  eine 
s  t  ru  ku  r  i  e  rt  e  P  rog  r  a  m  m  i  e  rs  p  r  a  che; 
ein  Programm  setzt  sich  aus  verschie¬ 
denen,  mehr  oder  weniger  oft  vor- 
ko  m  m  en  d  e  n  P  rogra  m  m  stru  ktu  re  n 
zusammen.  Von  diesen  Strukturen 
haben  wir  auch  schon  die  einfachste 
kennengelernt:  die  Befehlsfolge  bzw. 
den  Anweisungsblock. 


Ein  solcher  Block  wird  mit  den  Sym¬ 
bolen  BEGIN  und  END  geklammert, 
z.B.  so: 

BEGIN 

WRITELN  ('Wie  geht  es  Dir  ?’); 

READLN  (antwort); 

END; 

Ein  solcher  Block  kann  in  einem 
Pascal-Programm  überall  dort  einge¬ 
setzt  werden,  wo  eine  einzelne  Anwei¬ 
sung  stehen  kann.  Und  ohne  diese 
doch  recht  triviale  Programmstruk¬ 
tur  wären  Pascalprogramme  nicht 
möglich,  wie  sich  zeigen  wird. 
Innerhalb  des  Blockes  werden  die  ent¬ 
haltenen  Anweisungen,  deren  An¬ 
zahl  theoretisch  unbegrenzt  ist,  der 
Reihe  nach  (sequentiell)  abgearbei¬ 
tet;  beginnend  bei  der  Anweisung 
nach  dem  BEGIN  bis  zu  der  vor  dem 
END.  Wer  aufgepaßt  hat,  wird  sofort 
die  funtamentale  Eigenschaft  einer 
strukturierten  Sprache  wie  Pascal  er¬ 
kennen:  Für  einzelne  Anweisungen 
können  Anweisungsblöcke  einge¬ 
setzt  werden,  in  denen  wiederum 
durch  Blöcke  ersetzbare  Anweisun¬ 
gen  enthalten  sind.  Damit  ist  die 
Möglichkeit  gegeben,  die  zur  Lösung 
eines  Problems  notwendigen  Schritte 
logisch  zu  gliedern  und  zusammen¬ 
zufassen... 

(MC) 
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Basic-Kurs 

Datensicherung  ist  die  Aufgabe,  die  wir 
uns  für  den  Basic-Kurs  dieses  Monats 
steilen.  Nachdem  unsere  Adressver- 
waltung  jetzt  schon  fast  funktionierte, 
wollen  wir  in  diesem  Teil  endlich  ein¬ 
mal  daran  gehen,  unsere  mühsam  ein¬ 
getippten  Daten  für  längere  Zeiträume 
auf  Kassette  oder  Diskette  zu  bannen. 

Datensicherung  erfolgt  mit  SAVE, 
haben  wir  in  einem  der  ersten  Teile 
gelernt.  Dies  trifft  allerdings  nur  auf 
Programme  zu.  Variablen  werden  mit 
einer  völlig  anderen  Befehlssequenz 
gespeichert. 

Dazu  müssen  wir  erst  einmal  etwas 
über  die  Kanäle  (STREAMS)  des 
Schneider  erfahren.  Insgesamt  neun 
dieser  Steuerkanäle  stehen  zur  Verfü¬ 
gung.  Auf  sie  können  Inpul-  und 
Print-Anweisungen  verbogen  wer¬ 
den.  Dabei  steht  Stream  0  -  7  für  Ta¬ 
statur.  Monitor  und  Windows  zur 
Verfügung,  der  Kanal  8  für  den 
Drucker  und  Kanal  9  lür  Datacorder 
bzw.  Floppy. 

Eine  Ansammlung  von  Daten  auf 
Diskette  oder  Kassette  nennt  man 
Datei.  Um  nun  unsere  Datei  auf  ex¬ 
terne  Datenträger  zu  bringen,  müssen 
wir  ihm  angeben,  daß  die  Datei 
eröffnet  werden  soll,  danach  mittels 
PRINT-Befehl  die  Daten  in  die  Datei 
schreiben  und  sie  dann  wieder  ord- 
n  u  n gsge nüi ß  sc h  I  ie ß e n . 

Zum  Printen  der  Daten  benutzen  wil¬ 
den  Floppy-Stream  Nr.  9.  Die  ande¬ 
ren  Streams  sind  momentan  noch 
uninteressant,  wir  kommen  im  näch¬ 
sten  Feil  auf  den  Druckerstream  Nr. 
8  zurück. 

Eine  Print-Anweisung  für  einen 
Stream  wird  durch  das  deutsche 
Nummernzeichen  #  gekennzeich¬ 
net.  Findet  der  Interpreter  hinter 
einer  Print-Anweisung  (oder  Input) 
ein  solches  Gatter,  so  weiß  er,  daß 
diese  Ausgabe  nicht  auf  den  Bild¬ 
schirm  geleitet  werden  muß,  sondern 
an  ein  Periphcriegeräl. 

Geöffnet  wird  eine  Datei  zur  Ausgabe 
mit  dem  Befehl  OPENOUT  "DA¬ 
TEINAME”.  Unser  Dateiname  soll 
die  BezeiehnungADRESS.DAT  tra¬ 
gen.  Vorher  soll  aber  noch  der 
Bildschirm  gelöscht  und  eine  Mel¬ 
dung  ausgegeben  werden,  daß  der 
Computer  mit  dem  Sichern  der  Da¬ 
ten  beschäftigt  ist. 

Wir  beginnen  bei  Zeile  3000  und 
schreiben: 

3000  CLS 

3010  LOCATE  10,10 

3020  PRINT  "DATEN  SICHERN" 


Danach  wird  die  Datei  zur  Ausgabe 
eröffnet: 

3030  OPENOUT  "ADRESS.DAT” 

Damit  der  Rechner  beim  Wiederein¬ 
laden  noch  weiß,  wieviel  Daten  über¬ 
haupt  gespeichert  wurden,  schreiben 
wir  die  laufende  Nummer  an  den  An¬ 
fang  der  Datei: 

3040  PRINT#9,LFD 
Die  Variable  LFD  enthält  bekannt¬ 
lich  die  Anzahl  der  bisher  erfaßten 
Daten  und  steht  nun  am  Anfang 
unserer  Datei. 

Danach  müssen  wir  zwei  Schleifen 
ineinander  verschachteln.  Die  erste 
Schleife  muß  hochzählen  bis  LFD 
und  lautet: 

3050  FOR  FELD  =  0  TO  LFD 

Die  zweite  Schleife  muß  innerhalb 
der  ersten  Schleife  achtmal  durchlau¬ 
fen  werden,  und  die  Einträge  des  Fel¬ 
des  auf  Datenträger  schreiben: 

3060  FOR  A DRESS  =  1  TO  8 
3070  PRINT#9,ADR$(FELD, 
ADRESS) 

3080  N EXT  ADRESS 
Danach  durchläuft  wieder  Schleife  1: 
3090  NEXT  FELD 
und  schon  kann  die  Datei  wieder  ge¬ 
schlossen  werden 
3100  C LOSEOUT 
und  zurück  zum  MENUE: 

3110  RETURN 


Das  war  schon  alles  zum  Thema  Da¬ 
tensicherung.  Auf  Ihrer  Diskette/ 
Kassette  befindet  sich  jetzt  eine  Datei 
mit  Namen  ADRESS.DAT,  die  die 
Anzahl  der  bisher  erfaßten  Daten 
sowie  das  komplette  Variablenfeld 
enthält. 

Mit  LOAD  oder  REIN  können  Sie 
sich  diese  Datei  nicht  mehr  ansehen, 
sondern  nur  noch  mit  den  Befehlen 
OPENIN,  INPUT.#9,  CLOSEIN. 

Ab  Zeile 4000  steht  in  Listing  1  die  La¬ 
deroutine  für  unseren  Datenblock. 
Wie  Sie  sehen,  hat  sich  außer  den 
obengenannten  Befehlen  nichts  ge¬ 
genüber  der  Speicherroutine  geän¬ 
dert.  Lediglich  INPUT  wurde  durch 
LINE  INPUT  vervollständigt,  damit 
auch  Variablen,  die  ein  Komma  ent¬ 
halten.  gelesen  werden  können. 

Beim  Abspeichern  können  Wartezei¬ 
ten  von  ein  paar  Sekunden  auftreten. 
Floppybesitzer,  die  den  Namen  ihrer 
Datei  ändern  wollen,  sollten  darauf 
achten,  daß  er  nicht  länger  als  acht 
Buchstaben  wird. 

Allgemein  sollten  jetzt  alle  Leser 
soweit  sein,  daß  sie  die  INKEY- 
Routine  aus  den  Tips  und  Tricks  7/86 
bei  Zeile  1510  einfügen  können.  Pro¬ 
bieren  Sie  es  mal  aus.  Wie  es  gemacht 
wird,  erfahren  Sie  in  der  nächsten 
Lektion.  (TM) 


3000  CLS 

3010  LOCATE  10,10 

3020  PR INT" DATEN  SICHERN" 

3030  OPENOUT  "adress.dat" 

3040  PRINT#9 , lfd 
3050  FOR  feld  =  0  TO  lfd 
3060  FOR  adress  =  1  TO  8 
3070  PRINT# 9 ,adr$ ( f eld , adress ) 

3080  NEXT  adress 
3090  NEXT  feld 
3100  CLOSEOUT 
3110  RETURN 
4000  CLS 

4010  LOCATE  10,10 

4020  PR INT "DATEN  LADEN  " 

4030  OPENIN  "adress.dat" 

4040  INPUT# 9 , lfd 

4050  FOR  feld  =  0  TO  lfd 

4060  FOR  adress  =  1  TO  8 

4070  LINE  INPUT#9,adr$(feld, adress) 

4080  NEXT  adress 

4090  NEXT  feld 

4100  CLOSEIN 

4110  RETURN 
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SPIELE  ZU  GEWINNEN 

Unter  den  Einsendern  dieses  Coupons  werden  25  Exem 
plare  des  klassischen  Arcade-Spiels  AIRWOLF  verlost. 
Der  Rechtsweg  ist  ausgeschlossen. 

Name  und  Adresse:  _ 


Computer-Typ:  _ 

Name  des  Magazins,  welchem  Sie  diesen  Coupon  ent¬ 
nommen  haben: _ 


Senden  Sie  diesen  Coupon  an: 

PETER  WEST  RECORDS  GmbH 

Am  Heerdter  Hof  15 
4000  Düsseldorf  11 


ONSTRUCTION 


RCADE 


ACB  erlaubt  das  einfache  Programmieren  von 
Sehr  einfach  zu  handhaben. 

Alle  Befehle  werden  direkt  eingegeben. 

Zu  dem  Paket  gehören  ein  SPRITE  EDITOR  ur 
AUSFÜHRLICHES  DEUTSCHES  HANDBUCH. 


Händleranfragen  an: 

PETER  WEST  RECORDS  GmbH 

Am  Heerdter  Hof  15 
4000  Düsseldorf  11 
Telefon  0211/5021  31 
Telex  8582493  pwr  oder 
Telefax  0211/5048619 


Ortwins  Run 


iiiimmmm . . 


iMiiiiiimiimiiiiiiM 


II 1 1 1 1 1 1 1 1 1 1 1 1 1  Hll  1 1 1 1 


llllllllll  N  1 1 II I IMIIMIIIM  1 1 


"Ortwins  Run”  ist  ein  sehr  schnelles  Actionspiel  mit  fanta¬ 
stischer  Grafik  und  vielen  Features. 

Helfen  Sie  Ortwin,  seine  Junggesellenbude  in  Ordnung 
zu  bringen,  bevor  seine  Freundin  zu  Besuch  kommt. 

Programmbeschreibung: 

Wenn  nach  dem  Intro  das  Menue  erscheint,  können  Sie 


sich  zwischen  einem  fertigen  Spiel  (1)  oder  dem  Games 
Designer  (2)  entscheiden.  Haben  Sie  Punkt  1  angewählt, 
so  erscheint  ein  Spielfeld,  auf  dem  Gläser  und  Flaschen 
von  Ortwins  letzter  Fete  verstreut  sind.  Sammeln  Sie  diese 
Sachen  ein,  aber  vermeiden  Sie  die  Berührung  mit 
Stopschildern  und  dem  Spielfeldrand.  Hier  gibt  es 
Energieabzug. 

Für  jedes  eingesammelte  Glas  erhalten  Sie  10  Punkte,  für 
jede  Flasche  50  Punkte.  Haben  Sie  den  ganzen  Müll  aufge¬ 
räumt,  so  erhalten  Sie  einen  Zeitbonus.  Am  rechten 
Bildrand  sind  in  einem  Info-Window  laufend  die  Punkt¬ 
zahl,  der  momentane  Level  und  die  verbleibende  Restzeit 
sichtbar. 

Haben  Sie  sich  für  Punkt  2  entschieden,  so  können  Sie  Ihr 
Spiel  selber  gestalten  und  erhalten  ein  neues  Menue  und 
das  Spielfeld.  Die  sechs  Menuepunkte  des  Designer- 
menues  haben  folgende  Funktion: 

1.  DESIGN: 

Beim  Anwählen  dieses  Menuepunkts  wird  abgefragt,  mit 
welchem  Objekt  Sie  arbeiten  wollen.  Fahren  Sie  dazu  mit 
dem  Fadenkreuz  über  das  gewünschte  Objekt  und  betäti¬ 
gen  Sie  den  Feuerknopf.  Wollen  Sie  eine  neues  Objekt  an¬ 
wählen,  so  betätigen  Sie  die  Feuertaste.  Punkt  7  bewirkt 
eine  Rückkehr  ins  Hauptmenue. 

2.  STORE: 

Hier  wird  die  gewünschte  Leveinummer  angegeben  und 
danach  in  den  Speicher  geschrieben.  Dieser  Vorgang 
dauert  ca.  15  Sekunden. 

3.  SAVE: 

Dieser  Punkt  dient  zum  Abspeichem  des  gerade  kon¬ 
struierten  Spiels  auf  Datenträger. 

4.  LOAD: 

Bei  Anwahl  dieses  Menuepunktes  können  Sie  Ihre  Eigen¬ 
konstruktionen  wieder  laden. 

5.  PLAY: 

Mit  diesem  Punkt  können  die  Level  im  einzelnen  durch¬ 
gespielt  werden.  Sie  geben  einfach  die  Leveinummer  an. 
Wurde  das  gewählte  Level  vorher  nicht  mit  Store  generiert, 
so  erscheint  eine  Fehlermeldung. 

6.  BACK: 

Dieser  Menuepunkt  bewirkt  eine  Rückkehr  zum 
INTRO. 


Steuerung: 

Die  Steuerung  von  Ortwin  und  dem  Games  Designer  er¬ 
folgt  entweder  über  Joystick  oder  die  Cursortasten. 

Floppybetrieb: 

In  den  Zeilen  4190  und  4310  muß  beim  Openout-  bzw. 
Openin-Befehl  das  Ausrufezeichen  gegen  einen  für  die 
Floppy  gültigen  Dateinamen  ausgetauscht  werden  (max.  8 
Zeichen  bspw:"OGAME”).  (I.  Schwarze) 


für  464-664-6128 


io  '  ==================================  [22191 

20  '  =  =  (2863 

30'=  ORTWIN'S  RUN  =  [764 J 

40  '  =  =  1286] 

50  '  =  (c)  1986  northern  Software  ltd  =  [24561 

60  '  =  =  [2863 

70  '  -  written  by  =  [5243 

80  '  =  =  [2861 

90  *  =  JOCHEN  'JOHNNY'  SCHWARZE  =  [1650] 

100  1  =  =  [2861 
110  1  ==================================  [22191 

120  *464  und  6128  BESITZER  MUESSEN  DIE  VAR  [34611 
IABLE  CURSORS  IN  KURSO$  AENDERN 

130  '  =========  INIT  ============  [12341 

140  '  [1171 

150  SPEED  WRITE  1  [1302] 

160  level  =  1 :en=300:sc=0:hi=1  1111  :it=0  [1632] 

170  ortwin$="THE  GREAT  ORTWIN"  [15741 

180  MODE  1  [5061 

190  SYMBOL  AFTER  32  [1296] 

200  MEMORY  34000  [313] 

210  INK  1,26  [56] 

220  INK  2,11  [1791 

230  INK  3,14  [2281 

240  INK  0,0  [531 

250  PAPER  0:CLS  [9733 

260  BOEDER  0  [1008] 

270  DIM  f eld (25,25)  [539] 

280  ENV  1 ,20,-2,10  [734] 

290  ENT  1 ,10, -2,1  [588] 

300  ENT  5,10,-2,14  [588] 

310  ENV  5,3,4,2,1,0,20,10,-0.5,10  [1512] 

320  saml{1 )=10:flas{1 )=5  [1046] 

330  saml ( 2 )  =1 :flas(2)=9  [324] 

340  saml  ( 3  )  =1  5  :  f  las  ( 3 )  =1  5  [1  407] 

350  saml ( 4 ) =1 : f las ( 4 ) =1  [983] 

360  saml  ( 5  )  =30 :  f  las  ( 5 )  =20  [1417] 

370  saml { 6 ) =5 : f las ( 6 ) =1 0  [10833 

380  saml  ( 7  )  =1 0  :  f  las  ( 7  )  =1  0  [1702] 

390  saml ( 8 ) =7 : f las ( 8 ) =3  [9091 

400  saml  ( 9  )  =40  :  f  las  ( 9  )  =1  0  [1203] 

410  hind ( 1 ) =5 :hind ( 2 ) =1 0  [1265] 

420  hind{ 3 ) =20 :hind ( 4 ) =1 00  [13721 

430  hind ( 5 ) *5 : hind ( 6 ) =60  [8221 

440  hind ( 7 ) =30 :hind ( 8 ) =50  [990] 

450  hind ( 9 ) =80  [3851 

460  1  [117] 

470  '  ====  =  =  =  spielfigur  =======  (2221  1 

480  '  (1171 

490  SYMBOL  129,60,126,219,255,102,60,36,10  [2119] 
2 

500  SYMBOL  130,0,0,36,0,24  (13591 

510  '  [117] 

520  '  =======  hindernis  ========  (19171 

530  '  (1171 

540  SYMBOL  131 ,60,126,255,129,129,255,126,  (20781 
60 

550  SYMBOL  132,0,0,0,126,126  (14951 

560  '  (1171 

570  '=========  pokal  ===========  [16991 

580  '  (1171 

590  SYMBOL  134,0,126,126,60,24,24,60  [18821 

600  SYMBOL  135,0,2,2,4,8,8,4  [22201 

610  '  [1171 

620  ' =========  flasche  =========  [13071 

630  *  [1171 

640  SYMBOL  140,0,24,24,60,126,126,126  [21731 

650  SYMBOL  143,0,8,8,4,2,2,2  [15561 

660  '  [1171 

670  *  ===========  erde  =========  [17191 

680  '  [1171 

690  SYMBOL  136,0,42,84,42,84,42,84  [23081 

700  SYMBOL  137,0,84,42,84,42,84,42  [20481 


34  CPC  8  86 


Abo-Order 

»ZEITSCHRIFT« 

»DATABOX« 

Abgesandt  am: 


198 _ 


Bemerkungen: 


Abo-Order 

»ZEITSCHRIFT« 

»DATABOX« 

Das  kompetente  Magazin  für 
alle  Schneider-Anwender! 

Bestellen  Sie  noch  heute 
Ihr  Abonnement 
mit  dieser  Postkartei 


Br»* 

ouwnchund 

frankieren 


Antwortkarte 


Schneider  CPC  International 
Postfach  250 

3440  Eschwege 


•RESTPOSTEN-PACK  1985« 
»Einzelhefte  1986« 

Abgesandt  am: 


198 _ 


Bemerkungen 


SONDERAKTION 
»  Restposten-Pack  1 98 S  « 
»Einzelheftbestellung  1986« 


Antwortkarte 


Bme 

auuetchend 

frankieren 


Absender:  (Bitte  genaue  Anschrift  angeben!) 


Name 


Vorname 


Schneider  CPC  International 
Postfach  250 


Firma 


Straße/Nr  /Postfach 


3440  Eschwege 


PLZ/Ort 


Einzelbezug 

»DATABOX« 


Abgesandt  am: 


198 _ 


Bemerkungen 


Einzelbezug 

»DATABOX« 


Absender:  (Bitte  genaue  Anschrift  angeben!) 


Name 


Vorname 


Firma 


Straße/Nr  /Postfach 


PLZ/Ort 


B'ire 

ousrerchend 

frankteren 


Antwortkarte 


Schneider  CPC  International 
Postfach  250 

3440  Eschwege 


i 


Datum:  Unterschrift  (bei  Minderjährigen  des  ges  Vertreters) 


»Abo-Order  Zeitschrift« 

Hiermit  bestelle  ich  „Schneider  CPC  International"  für  mindestens 
□  1/2  Jahr  □  1  Jahr 
Zustellung,  Vertriebskosten  und  MwSt  sind  im  günstigen 
Preis  von  30,-  DM  bzw  60,-  DM  enthalten  (BRD  und  West-Berlin) 
Auslandspreise:  Europa  12  Ausgaben  -  90,-  DM, 

6  Ausgaben  -  45,-  DM 

AitBereurophlschas  Ausland  12  Ausgaben  -  120,-  DM, 

6  Ausgaben  -  60,-  DM 

Lieferung  soll  ab  Ausgabe  Nr  erfolgen 


Uaforanschrift 

□  Geschäft  □  Privat 


Vorname 

!,  Name 

1  1 

1  1 

M  M  M  M  M  M 

Firma  (nur  wenn 

MIM 

Lieferadresse) 

MIMI 

Straße,  1 

UJ 

Nr /Postfach 

1  1  1  1  11  i  1  1  1  1  11 

PLZ/Ort  (Bitte  genaue  Anschrift  angeben 1) 

Dieses  Abonnement  verlängert  sich  automatisch  um  1/2  bzw  1  Jahr,  wenn 
es  nicht  sechs  Wochen  vot  Ablauf  schriftlich  gekündigt  wird 


»Abo-Order  DATABOX« 

Hiermit  bestelle  ich  die  □  CPC  Databox  □  Joyce-Databox 
für  mindestens  □  1/2  Jahr  □  1  Jahr 
als  DCassette  □  Diskette 

Bezugspreise  Inland  (einschl  Porto/Verpackung) 

Cass  1/2  Jahr  90,- DM,  1  Jahr  180,- DM 
Disk  3"  1/2  Jahr  150,-  DM,  1  Jahr  300,-  DM 
Bezugspreise  Ausland  (eingeklammerte  Werte  außereuropäisch) 
Cass.  1/2  Jahr  100, -(120,-)  DM,  1  Jahr 200,- (240,-)  DM 
Disk  3"  1/2  Jahr  160.-  (180,-)  DM,  1  Jahr  320,-  (360.-)  DM 


Gewünschte  Zahlungswelse: 

□  Bequem  und  bargeldlos  durch  Bankabbuchung 


Bankleifzahi  (von  Scheck  abschreibem 

M  M  M  M  M_L 

II  M  M  1 

Konto- Nr /-Inhaber 

II  1  II 

Geldinstitut 

□  Gagen  Rechnung  -  zahlbar  innerhalb  zwei  Wochen  nach  Erhall 
(Bitte  keine  Vorauszahlung  leisten  -  Rechnung  abwarten) 

Garen  tie: 

Ich  weiß,  daß  ich  diese  Vereinbarung  innerhalb  einer  Woche  bei  der  Bestell¬ 
adresse  schriftlich  widerrufen  kann,  wobei  bereits  die  rechtzeitige  Absen¬ 
dung  meines  Widerrufschreibens  zur  Fristwahrung  ausreicht  Ich  bestätige 
das  durch  meine  zweite  Unterschrift 


Datum  Unterschrift 

(bei  Minderjährigen:  Unterschritt  des  ges  Vertreters) 

Bitte  unbedingt  zwei  Unterschriften  leisten! 


Datum 


Unterschritt 
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Abo-Zeitschrift 

Abo-DATABOX 

Bestellen  Sie  Ihr  Abonnement  mit 
der  nebenstehenden  Karte! 
Preisvorteil  gegenüber  dem  Einzel¬ 
bezug! 

Mit  einem  Databox-Abo  erhalten  Sie 
die  Software  zum  Magazin  immer 
pünktlich  und  mit  einem  saftigen 
Preisvorteil  gegenüber  dem  Einzel¬ 
bezug! 


Bestellkarte 
»RESTPOSTEN-PACK  1985« 
»EINZELHEFTE  1986« 

Wir  räumen  unser  Lager  und  bieten 
unseren  Lesern,  die  1 985  noch  nicht 
"dabei”  waren,  die  Möglichkeit,  die 
noch  vorhandenen  Ausgaben  des  ver¬ 
gangenen  Jahres  preisgünstig  ”im 
Paket”  zur  erstehen.  Dies  sind  die 
Ausgaben  8, 10, 11  und  12/85. 
Bitte  benutzen  Sie  hierfür  die  neben¬ 
stehende  Karte! 

Die  1 986'er  Ausgaben  sind  noch 
sämtlich  erhältlich. 


»DATABOX« 

Einzelbezug 

Die  Software  zum  Magazin! 
Problemlos  bestellen  mit  der  Anfor¬ 
derungskarte! 


IIIIIHI 


imiiiiiiHiMiM  IIIMIMIIIIIII  NiiiiHMiiimM  1111111111111111  Min  iiiiMiiiimimiimm  IIIIIII IIIIIIIII  immiiiiimiiiiii 


Programme . 


710  ' 

720  1  ==========  rand  ========== 

730  ' 

740  SYMBOL  133,255,129,129,129,129,129,129 

,255 

750  1 

760  1  =====spielf igur/shape===== 

770  * 

780  mann$=CHR$ ( 32 ) +CHR$ ( 8 ) +CHR$ ( 22  >  +CHR$ ( 1 
) +CHR$ ( 1 5 ) + CHR$ { 3 ) +CHR$ { 1 2 9 ) +CHR$ ( 8 ) +CHR$ ( 
1 5 ) +CHR$ ( 1 )+CHR$ ( 1 30  >+CHR$ ( 22  )  +CHR$ ( 0 ) 

790  ' 

800  1  =====hindernis/shape»*»»== 

810  ' 

820  shape$ ( 1 ) =CHR$ ( 32 ) +CHR$ ( 8 ) +CHR$ ( 22 ) +CH 
R$(1 ) +CHR$( 1 5 ) +CHR$ ( 2 )+CHR$ ( 1 31  )+CHR$(8)+C 
HR$ (15) +CHR$ ( 1 )+CHR${ 1 32 )+CHR$ ( 22 )+CHR$ ( 0 ) 


830  ' 

840  '  ======== pokal /shape======= 

850  ’ 

860  shape$ ( 2  » =CHR$ ( 32 ) +CHR$ ( 8 ) +CHR$ ( 22 ) +CH 
R${ 1 )  4CHR$ (15) +CHR$ ( 2 ) +CHR$ (134) +CHR$ ( 8 )  +C 
HR$ ( 1 5 )+CHR$ ( 1 )+CHR$ ( 1 35 )+CHR$ ( 22 )+CHR$ ( 0 ) 
870  ' 

880  '  ========f lasche/ shape===== 

890  ' 

900  shape$ ( 4 ) =CHR$ ( 32 ) +CHR$ < 8 )  +  CHR$ { 22 ) +CH 
R$ ( 1 ) +CHR$ (15) +CHR$ ( 2 ) +CHR$ (140) +CHR$  ( 8 ) +C 
HR$ (15) +CHR$ ( 1 ) +CHR$ (143 )+CHR$ ( 22 ) +CHR$ ( 0 ) 
910  ' 

920  '  =========erde/shape======= 

930  ' 

940  shape$ ( 0 ) =CHR$ ( 32 ) +CHR$ ( 8 ) +CHR$ ( 22 ) +CH 
R$( 1 )+CHR$( 1 5 )+CHR$( 3 )+CHR$(  136 )+CHR$  ( 8 )+C 
HR$ ( 1 5 ) +CHR$ ( 2 )+CHR$ (137) +CHR$ ( 22 ) +CHR$ ( 0 ) 
950  ' 

960  1  ========= rand/ shape======= 

970  ' 

980  shape$ ( 3 ) =CHR$( 32 ) +CHR$ ( 8 )+CHR$ ( 22 ) +CH 
R$ ( 1 ) +CHR$ (15) +CHR$ ( 3 ) +CHR$ (136) +CHR$ ( 8 ) +C 
HR$ (15) +CHR$ ( 2 ) +CHR$ (137) +CHRS ( 8 ) +CHR$ (15) 


+  CHR$  ( 1  }+CHR$  (133)  +CHR$  { 22  )  +CIIR$  (  0  ) 

990  items(1 ) =1 5 : itemsf 2 )  =  1 0 
1000  items( 3 ) =30: items( 4 ) =2 
1010  items( 5 ) =50 : items ( 6 ) =1 5 
1020  items(7)=20:iteras(8)=10 
1030  items(9)=50 
1 040  sc=0: levelal : it=0 
1050  ' 

1060  ' ======================  intro  ==  ==== 


sassssssssasxs 


STEP  -1:L0CATE  1,a:PRIN 


1070  ' 

1080  MODE  1 

1090  POKE  &B28B,1 20 

1100  FOR  a=1  TO  40:LOCATE  a,1:PRINT  shape$ 
{ 0 ) : NEXT 

1110  FOR  a=1  TO  25:LOCATE  40, a: PRINT  shape 
$ ( 0 ) :NEXT 

1120  FOR  a=40  TO  1  STEP  -1 :LOCATE  a,25:PRI 
NT  shape$(0):NEXT 
1130  FOR  a=25  TO  1 
T  shape$(0):NEXT 
1140  PEN  1 

1150  PRINT  CHR$ ( 22 ) ; "1 " 

1160  FOR  a=1  TO  40:LOCATE  a,1: PRINT  CHR$(1 
33) :NEXT 

1170  FOR  a=1  TO  25:LOCATE  40,a:PRINT  CHR$( 
133)  :NEXT 

1180  FOR  a=40  TO  1  STEP  -1 :LOCATE  a,25:PRI 
NT  CHR$( 133): NEXT 
1190  FOR  a=25  TO  1 
T  CHR$ ( 1 33 ) :NEXT 
1200  PRINT  CHR$(22 ) ;"0" 

1210  LOCATE  10,3: PRINT"NORTHERN  SOFTWARE  L 
TD." 

1220  LOCATE  1 7,5:PRINT"PRESENTS" 

1230  LOCATE  1 5 , 8 : PRINT"ORTWIN ' S  RUN" 

1240  LOCATE  16,12: PRINT"WRITTEN  BY" 

1250  LOCATE  1 8 , 1 4 : PRINT" JOHNNY" 

1260  LOCATE  18,19:PRINT  CHR$(164);"  1986" 
1270  GOSUB  4960 

1280  LOCATE  11,23: PRINT"ANY  KEY  TO  CONTINU 
E." 

1290  CALL  &BB06 
1300  * 

1310  1  ===============  menue  =============  = 


STEP  -1: LOCATE  1,a:PRIN 


1320  1 


(1171 
(1748  1 
11171 
(26741 

(117) 
(1940  1 
(1171 
(6642) 


(1171 
(1896  1 
(1171 
(53521 


(1171 
(2348  1 
(1171 
(78821 


(1171 
(22281 
1117] 
(6900  1 


(1171 

(19731 

(1171 

(71281 


(1171 
(17971 
(117  1 
(8082 1 


(20031 

(10291 

(17161 

(16461 

(5691 

(1251  1 

(117) 

(39291 

(1171 

(5061 

(6591 

(15751 

(1883) 

(3855) 

(36451 

(5491 
(1293  1 
(16691 

(21681 

(43561 

(2881  1 

(12951 

(31131 

(16761 

(18131 

(17991 

(1694  1 

11618] 

(9231 

(2547  1 

(393  ) 
(117  1 
(2286 1 

(1171 


1330  WINDOWS  ,2,39,2,24:CLS#1  (11231 

1340  LOCATE  4, 3: PRINT" PLAY  COMPUTER- STYLED  (40521 

GAME  ...:  1" 

1350  LOCATE  4 , 5 : PR INT" GAME  DESIGNER  .  [29581 

. .  2" 

1360  LOCATE  28,23:PRINT"GO  ON  ..."  (12031 

1370  aS«"" : WHILE  a$="" :a$=INKEY$ : WEND  (18121 

1380  a«VAL(a$):IF  a<1  OR  a>2  THEN  1370  [1353] 

1390  IF  a«1  THEN  GOTO  1440  [17031 

1400  IF  a=2  THEN  GOTO  3090  [8801 

1410  *  1117] 

1420  1  Spielfeld  ========  (18591 

1430  *  (1171 

1440  MODE  1  :selfstyled=0:level=1 :en=300  (3301  1 

1450  *  (1171 

1460  FOR  y=1  TO  25:FOR  x=1  TO  25:feld<x,y)  (45701 

«0 : LOCATE  x,y: PRINT  shape$(0):NEXT  x,y 
1470  LOCATE  1,1  SPRINT  CHR$ ( 22 ) ; "1 : PEN  1  (1097) 

1480  FOR  a=1  TO  25  (931 1 


1490  LOCATE  a,1:PRINT  CHR$( 1 33) ; :feld(a,1 )  (15211 

«3 

1500  LOCATE  25+1  -a, 25: PRINT  CHR$(1 33 ) ; : fei  (32631 
d( 25+1 >a,25) =3 

1510  LOCATE  2 5, a SPRINT  CHR$ ( 1 33 ) ; : f eld ( 25,  (3250) 
a)=3 

1520  LOCATE  1 ,25+1 -a: PRINT  CHR$ ( 1 33 ) ; : feld  (33031 


(1 ,25+1-a)=3 

1530  NEXT SPRINT  CHR$(22);"0"  (17821 

1540  *  (1171 

1550  *  ■  hindernisse  verteilen  ■■  [1475] 

1560  '  (1171 

1570  FOR  i=1  TO  hind(level)  (21911 

1580  x=INT(RND*22 )+2  (14311 

1590  y=INT(RND«22)+2  II 437  J 

1600  IF  feld(x+1,y)<>0  THEN  1580  [16291 

1610  IF  feld(x-1 ,y) «  >0  TUEN  1580  (9061 

1620  IF  feld(x,y+1 ) <  >0  THEN  1580  (21481 

1630  IF  feld<x,y-1 )<>0  THEN  1580  (987) 

1640  IF  f eld (x,y ) <  >0  THEN  1580  (16441 


8  '86  CPC  37 


'Programme . 


II . . 1 1 1 1 1 1 II 1 1 1 1 1 1 1 1 1 1 II I 


1650  feld(x,y)-1  1574 I 

1660  LOCATE  x,y: PRINT  shape$(1)  [14671 

1670  HEXT  i  1375) 

1680  1  [1171 

1690  *  =====  pokale  verteilen  =====  [3338] 

1700  ’  1117) 

1710  FOR  i=1  TO  saml(level)  [982] 

1720  x=INT(RND*22)+2  [1431] 

1730  y=INT(RND*22)+2  [14371 

1740  IF  feld(x+1 ,y)<>0  THEN  1720  [1681] 

1750  IF  feld(x-1 ,y) < >0  THEN  1720  [862 ) 

1760  IF  f eld ( x, y+1 )  <  >0  THEN  1720  (2088) 

1770  IF  feld(x, y-1  )  <  >0  THEN  1720  [847] 

1780  IF  feld(x,y) <  >0  THEN  1720  [1664] 

1790  feld(x,y)=2  [573] 

1800  LOCATE  x,y: PRINT  shape$(2)  [1549] 

1810  NEXT  i  [375) 

1820  1  [117] 

1830  *  ==  flaschen  verteilen  ===  [1941  ] 

1840  1  [117] 

1850  FOR  i=1  TO  flas< level)  [588] 

1860  x=INT(RND*22 )  +  2  [1431] 

1870  y=INT(RND*22)+2  [1437] 

1880  IF  feld(x+1 ,y) <>0  THEN  1860  [1527] 

1890  IF  f eld (x-1 ,y )  <  >0  THEN  1860  [898] 

1900  IF  feld (x, y+1 ) <  >0  THEN  1860  [2140] 

1910  IF  feld(x,y-1  )  <  >0  THEN  1860  [1138] 

1920  IF  feld(x,y) <  >0  THEN  1860  [1636  ] 

1930  feld(x,y)=4  (571  ] 

1940  LOCATE  x,y: PRINT  shape${4)  [1545] 

1950  NEXT  i  (375] 

1960  •  (117J 

1970  ‘  =============  anzeige  rechts  ======  [2570] 


1980  ‘ 

1990  PEN  1 

2000  LOCATE  27 , 1 0 : PRINT"SCORE  : 
###") sc 

2010  LOCATE  27,13: PRINT"HIGH  : 
ff  ff  ff"  ;  hi 

2020  LOCATE  27,16: PRINT"LEVEL  : 
###";  level 

2030  LOCATE  27 , 1 9 : PRINT" ITEMS  : 
###"; it 

2040  LOCATE  27 , 22 : PRINT"ENERGY : 


[117] 
(549  ) 

";USIN  G"##  [1394] 
"  ; US ING"##  [23601 
";USIN  G"##  [2707] 
" ;USING"##  [3173] 
";USING"##  (3113] 


###";e  n 
2050  ' 

2060  ’ ========= 


[117] 

HAUPTPROGRAMM  ====  (3092) 


2070  1  [117] 

2080  erdeS=shape$ (0 )  [12311 

2090  1  [117] 

2100  '===========  spielfigur  setzen  ======  (35211 


2110  ' 

2120  x=INT(RND*22 ) +2 : y=INT( RND*22 ) +2 
2130  IF  feld(x+1 ,y)<>0  THEN  2120 
2140  IF  feld(x-1 ,y ) < >0  THEN  2120 
2150  IF  feld(x,y+1 ) <  >0  THEN  2120 
2160  IF  feld(x,y-1  ) <  >0  THEN  2120 
2170  IF  feld (x,y ) <  >0  THEN  2120 
2180  ' 

2190  '=====  joystick  +  cursortasten  abfrag 


1117  ] 
[1866  J 
[1  555  1 
[8621 
[2088  ] 
[846  ] 
[1664  ) 
[117] 
[2698  ] 


en  ===== 

2200  '  [117] 

2210  beweg=0: LOCATE  x,y:PRINT  mann?  [823] 

2220  IF  en<1  THEN  2720  [710) 

2230  IF  items ( level )=0  THEN  2850  (10591 


2240  IF  JOY ( 0 ) =1  OR  INKEY[0)=0  THEN  beweg»  12738] 
1 : 1  oben 

2250  IF  JOY{0 ) =2  OR  INKEY<2)*0  THEN  beweg=  [2606] 
2: '  unten 

2260  IF  JOY(0 )=4  OR  INKEY(8)=0  THEN  beweg=  [3067] 
3:'  links 

2270  IF  JOY ( 0 ) =8  OR  INKEY(1)=0  THEN  beweg»  (2653) 


4:'  rechts 

2280  '  [117] 

2290  1  ==========  bewegung  nach  oben  =====  [2165] 

2300  *  [1171 


2310  IF  beweg<>1  THEN  2410  [524] 

2320  SOUND  1,100,2,5  ,,,15  [1550] 

2330  IF  feld(x,y-1 )=0  THEN  y=y-1:LOCATE  x,  [4182] 
y: PRINT  mann$:LOCATE  x,y+1:PRINT  erde? 

2340  IF  feld(x,y-1 )=2  THEN  f eld(x,y-1 ) =0 : S  [158631 

OUND  1 , 40 , 1 0 , 1 5 , , 1 : sc=sc+1 0 : it=it+1 : items ( 

level  ) »items (  level )  -1  :‘y=y-1  : LOCATE  x,y  :PRI 

NT  mann$: LOCATE  x,y+1:PRINT  erde$ ; : LOCATE 

35,10: PEN  1 : PRINT  USING"#####" ; SC : LOCATE  3 

5,1 9: PRINT  USING"#####" ;it:GOTO  2220 


iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiimiiiiiiiiiiiiiiiiiiiiiiiiiiiiiMiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiMiii 


2350  IF  feld(x,y-1 )=4  THEN  feld(x,y-1 )=0:S  112507] 
OUMD  1 , 40, 10, 15, ,1 :sc=sc+50:it=it+1 : items ( 
level ) »itemsi level )-1 :y=y-1 : LOCATE  x,y:PRI 
NT  inannS :  LOCATE  x,  y  +  1:  PRINT  erde? ;: LOCATE 
35, 10: PEN  1 : PRINT  USING"#####" ; sc: LOCATE  3 
5,19:  PRINT  USING"#####";it:GOTO  2220 
2360  IF  feld(x,y-1 )=3  THEN  en=en-1 : LOCATE, 

35,22:  PEN  1  :  PRINT  USING"#####"  ,*en  :GOTO  222 
0 

2370  IF  feld (x,y-1 )=1  THEN  en=en-1 : LOCATE 
35,22: PEN  1:PRINT  USING"#####";en:GOTO  222 
0 

2380  * 

2390  1  ==========  bewegung  nach  unten  ==== 

2400  ' 

2410  IF  beweg <  >2  THEN  2510 
2420  SOUND  1,100,2,  5, ,,15 

2430  IF  feld{x,y+1 ) =0  THEN  y=y+1 : LOCATE  x, 
y: PRINT  mann$: LOCATE  x, y-1: PRINT  erde$ 

2440  IF  f eld(x,y+1 ) =2  THEN  feld(x,y+1 )=0:S  (15243 
OUND  1 ,40, 10,1 5,, 1 :sc=sc+10:it=it+1 : items ( 
level )=items( level )~1 :y=y+1 : LOCATE  x,y :PRI 
NT  mann$:LOCATE  x,y~1:PRINT  erde$ ;  :LOCATE 
35,10;PEN  1:PRINT  USING"#####" ; sc: LOCATE  3 
5,19: PRINT  USING" #####" ; it:GOTO  2220 
2450  IF  feld(x,y+1 )=4  THEN  feld(x,y+1 )=0:S  114180 
OUND  1 ,40,10,1 5,, 1 : sc=sc+50: it=it+1 : items ( 
level ) »itemsi level ) -1 :y=y+1 : LOCATE  x,y:PRI 
NT  mann $: LOCATE  x,y-1:PRINT  erde? LOCATE 
35,10: PEN  1:PRINT  USING"#####" ;sc:LOCATE  3 
5,19: PRINT  USING"#####" ; it :GOTO  2220 
2460  IF  feld(x,y+1 >  =3  THEN  en=en-1 : LOCATE 
35,22: PEN  1:PRINT  USING"#####" ;en:GOTO  222 
0 

2470  IF  feld(x,y+1 )=1  THEN  en=en-1 : LOCATE 
35,22:  PEN  1:PRINT  USING"#####"  ;en:GOTO  222 
0 

2480  ’ 

2490  *  ==========  bewegung  nach  links  ==== 

2500  ' 

2510  IF  beweg <  >3  THEN  2610 
2520  SOUND  1,100,2,  5,,,  15 

2530  IF  feld(x-1 ,y)=0  THEN  x=x-1 : LOCATE  x, 
y: PRINT  mann $: LOCATE  x+1,y:PRINT  erde$ 

2540  IF  feld(x-1 ,y)=2  THEN  feld(x-1 ,y)=0:S  [13008 
OUND  1 ,40, 10,1 5,, 1 : sc»sc+1 0 : it=it+1 : items ( 
level ) =items ( level ) -1 : x=x-1 : LOCATE  x , y : PRI 
NT  mann$ : LOCATE  x+1,y:PRINT  erde  $ ; : LOCATE 
35,10  :PEN  1:PRINT  USING"#####"  ;sc:  LOCATE  3 
5,1  9: PRINT  USING"#####";it:GOTO  2220 
2550  IF  feld(x-1 ,y}=4  THEN  feld(x-1 ,y)=0:S  [13139 
OUND  1 , 40 , 1 0 , 1 5 , , 1 : sc»sc+50 : it=it+1 : items ( 
level ) »items ( level ) -1 :x=x-1  : LOCATE  x,y: PRI 
NT  mann $: LOCATE  x+1,y:PRINT  erde? LOCATE 
35,10: PEN  1: PRINT  USING"#####" ; sc:LOCATE  3 
5,19: PRINT  USING"#####" ;it:GOTO  2220 
2560  IF  feld(x-1 ,y ) =3  THEN  en=en-1 : LOCATE 
35, 22: PEN  1:PRINT  USING"#####" ;en :GOTO  222 
0 

2570  IF  feld(x-1 ,y }=1  THEN  en=en-1 : LOCATE 
35,22:  PEN  1  :  PRINT  USING"#####";en:GOTO  222 
0 

2580  ' 

2590  ’  ==========  bewegung  nach  rechts  === 

2600  ’ 

2610  IF  beweg <  >4  THEN  2680 
2620  SOUND  1,100,2,  5, ,  ,15 

2630  IF  feld(x+1 ,y)=0  THEN  x=x+1 : LOCATE  x, 
y: PRINT  ftiann$:LOCATE  x-1 ,y:PRINT  erde$ 

2640  IF  feld(x+1 ,y)=2  THEN  feld(x+1 ,y)=0:S  [14653! 

OUND  1, 40, 10,1 5,, 1 :sc=sc+1 0: it=it+1 : items! 

level) »itemsi level )-1 :x=x+1 : LOCATE  x,y:PRI 

NT  raann$: LOCATE  x-1,y:PRINT  erde? ; :LOCATE 

35,10: PEN  1:PRINT  USING" #####" ; sc: LOCATE  3 

5, 19: PRINT  USING" H M M " ; it : GOTO  2220 

2650  IF  feld(x+1 ,y) =4  THEN  feld (x+1 ,y ) =0: S  [15329] 

OUND  1, 40, 10, 15, ,1 :sc=sc+50:it=it+1 :items( 

level) -items ( level )-l :x,x+1 : LOCATE  x,y:PRI 

NT  mann? : LOCATE  x-1 ,y: PRINT  erde?; : LOCATE 

35, 10: PEN  1: PRINT  USING"#####" ; sc:LOCATE  3 

5,19: PRINT  USING"#####" ; it :GOTO  2220 

2660  IF  feld(x+1 ,y)=3  THEN  en=en-1 : LOCATE  (5830) 

35, 22: PEN  1:PRINT  USING"#####" ;en:GOTO  222 

0 

2670  IF  feld (x+1 ,y)=1  THEN  en=en-1 : LOCATE  15118) 
35, 22: PEN  1:PRINT  usiNG"#####";en:GOTO  222 

0  •  • 

2680  '  [117] 

2690  game  over  [25331 


[3067] 


[2348] 


[117] 
[1874  ] 
[117] 
[692  ] 
[1550] 
[6379) 


[48623 


[6874] 


(117i 

[21651 

[117] 

[730] 

[1550] 

[4571  ) 


[40931 


[4050] 


[1171 
[1860  ] 
[117] 
11564  ] 
11550] 
[6986] 
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2700  •  [117] 

2710  GOTO  2220  [367] 

2720  LOCATE  6,11:PRINT  STRINGS (15,32)  [17251 

2730  LOCATE  6,12:PRINT  STRING? (15,32)  [15791 

2740  LOCATE  6,13:PRINT  STRING? (15,32)  fl  3381 


2750  PLOT  80,192,1 jDRAW  318,192:DRAW  318,2  [41061 
38 : DRAW  80, 238: DRAM  80  192 

2760  PLOT  82,194,2: DRAW  31  6,194:DRAW  316,2  (38171 
36:  DRAW  82, 236,: DRAW  82,194 

2770  PLOT  84 , 1 96 , 3 : DRAW  314,196:DRAW  314,2  [38031 
34: DRAW  84, 2 34: DRAW  84,196 

2780  LOCATE  9,12:PEN  1 :PRINT"GAME  OVER"  [14641 
2790  IF  sc >hi  THEN  hi=sc  [1361] 

2800  SOUND  1 ,600, 140, 15,5, 5:SOUND  2,604,14  [39301 
0,1 5, 5, 5: SOUND  4,596,1  0,15,5,5 

2810  FOR  a=1  TO  2000 :NEXT: IF  selfstyled=1  [4402] 


THEN  3090  ELSE  990 

2820  '  [117] 

2830  '===■  level  beendet  =  «  =  *  ==*  =====  [2514  1 

2840  '  [1171 

2850  LOCATE  6,10:PRINT  STRING? ( 1 5 , 32 )  [16091 

2860  LOCATE  6,11:PRINT  STRINGS ( 1 5 , 32 )  [17251 

2870  LOCATE  6,1 2: PRINT  STRING$( 1 S , 32 )  [15791 

2880  LOCATE  6,13:PRINT  STRINGS ( 1 5 , 32 )  [13381 

2890  LOCATE  6,14:PRINT  STRINGS ( 15, 32 )  [1822] 

2900  LOCATE  6,15:PRINT  STRINGS ( 1 5 , 32 )  [17691 

2910  LOCATE  6,16:PRINT  STRINGS ( 1 5 , 32 )  [21 761 


2920  PLOT  80,144,1 :DRAW  318,144:DRAW  318,2  [33471 
54: DRAW  80,254:DRAW  80,144 

2930  PLOT  82,146,2: DRAW  316,146:DRAW  316,2  [2894] 
52: DRAW  82, 2 52: DRAW  82,146 

2940  PLOT  84,148,3: DRAW  314,148;DRAW  314,2  (43811 
50: DRAW  84, 250: DRAW  84,148 

2950  LOCATE  11,11  :PEN  1  :  PRINT,'BONUS"  [21721 

2960  zahl=level*1 0  [1364] 

2970  bonus=level *1 00  [1358] 

2980  LOCATE  7,13:PRINT  zahl;"x  ";shape$(2)  (56721 

=1";bonus: LOCATE  9,15:PRINT"+  ";:PRINT 
USING"###" ;en ; : PRINT"  x  *';shape${4) 

2990  FOR  i=1  TO  8:FOR  a=26  TO  1  STEP  -1:IN  [17526] 
K  0,26-a:BORDER  26-a:SOUND  1 , ( a+20 *3 ) ,  1 . 4 , 

1 5:NEXT:NEXT:BORDER  0:INK  0 , 0 : level =level+ 

1 : sc=sc+bonus+en: LOCATE  35,10:PRINT  USING" 
f¥#W';sc:IF  level  =  10  THEN  4550  ELSE  en=30 
0 : IF  seif styled=1  THEN  FOR  a=1  TO  3000 :NEX 
T 

3000  IF  seif styled=1  THEN  GOTO  3010  ELSE  G  [22251 
OTO  1 460 


3010  '  (1171 

3020  '  (1171 

3030  '============*====*==  hauptprogramm  I  [5040 1 

3040  '  [1171 

3050  '===================  game  -  designer  [40161 


3060  '  [117] 

3070  '=============  =  ====*=  menue  ==========  [21091 


:s:::s:s==3:s::sss=::::s2 ssriasarsss 

3080  ' 

3090  MODE  1 

3100  FOR  i=1  TO  25; FOR  ii=1  TO  25 

3110  LOCATE  ii,i: PRINT  shape?< 0  )  ; : feld ( ii , 

i )  =0 

3120  NEXT  ii , i 

3130  PEN  1 : PRINT  CHR$ ( 22 ) ; "1 " : POKE  &B28B.1 
20 

3140  FOR  a= 1  TO  25 

3150  LOCATE  a,1: PRINT  CHR$ ( 1 33 ) ; : f eld ( a ,  1  ) 

=  3 

3160  LOCATE  25, a: PRINT  CHR$ ( 1 33 ) ; : f eld ( 25 , 
a)=3 

3170  LOCATE  26 -a , 25 : PRINT  CHR$ (1 33 ) ; : f eld ( 
26-a, 251=3 

3180  LOCATE  1, 26-a: PRINT  CHR$( 1 33 ) ; : feld{ 1 
, 26-a 1=3 


[1171 
(506  J 
[1280  1 
121371 

[438  ] 
[3283  1 

[931  } 
[1  521  1 

(3250  1 

[2550  ] 

[1972  1 


3190  NEXT  a  [383  1 

3200  LOCATE  27,2: PR INT" GAME  DESIGNER"  [1810] 

3210  LOCATE  28,7:PRINT"DESIGN  :  1"  [2364] 

3220  LOCATE  28,9: PR INT" STORE  :  2"  [1759] 

3230  LOCATE  28 , 1 1 :PRINT"SAVE  :  3"  [1307] 

3240  LOCATE  28 , 1 3 :PRINT"LOAD  :  4"  (1298 J 

3250  LOCATE  28,1 5:PRINT"PLAY  :  5"  [11731 

3260  LOCATE  28,1 7:PRINT"BACK  :  6"  (17231 

3270  LOCATE  28 , 20 : PRINT"GO  ON  ..."  (15261 

3280  a$-INKEYS:a«VAL(a$)  17591 

3290  IF  a<1  OR  a»6  THEN  3280  (9221 

3300  ON  a  GOTO  3340,3840,4100,4230,4350,99  [13491 
0 

3310  '  (1171 


Postfach  1461  *  7920  Heidenheim  *  Tel.:  (07321)  46664 
Bankverb.:  Dresdner  Bank  Heidenheim  (BL261480001),  Kto.:  570142900 


kt 


ECB  B 


TTT7TTJ 


I  i 

If 

!  » 

s  s 


i  i 


ij 

i1 1 


— 

- 1 

6128 

u 

664 

464 

- J 

1 - 1 

Erweitern  Sie  Ihren  CPC 
zu  universellem  Einsatz 
mit  ECB -Bus  von  Sikos 


G.  Qriinthanrw-Ukwattoge 

Neuwerkerweg  1 7  •  D-8504  Stein 
»  (09 1 1 )  68  67  23  oder  32  55  58 


SSK0S 

data-applications 


8  ’86  CPC  39 


. Programme1 


iiiiiiiimiiiiiiiiciiiiMiiiiiiimi 


Miim  i  ihm  ii  ihm  1 1 1  um  ii  1 1 1 1  ii  1 1 1  mm  1 1  m  m  i  ii  mim  1 1  im 


3320 


designer  =====  130191 


3330  *  [1171 

3340  SYMBOL  255,10,16,0,214,0,16,16  (22131 

3350  cursor$=CHR$ { 255 ) : shape$ { 5 ) =CHR$ { 22 )  +  [28531 
"0"+ "  " 


3360  x=2 :y=2  (8031 

3370  WINDOW  #1 , 27 , 40 , 1  , 25 :CLS#1  (1386  1 

3380  LOCATE  30,1 2  .-PRINT  shape$(1);"  =  1"  (2607  1 

3390  LOCATE  30,14:PRINT  shape$(2);"  =  2"  (22141 

3400  LOCATE  30,16:PRINT  shape$ ( 4 ) ; "  -  3"  (24771 

3410  LOCATE  30,18:PRINT  shape$ ( 0 ) ; : PEN  1 :P  [24931 

RINT"  =  4" 

3420  LOCATE  30,20:PRINT  shape$<3);"  =  5"  [27091 

3430  PEN  1 : LOCATE  30,22:PRINT"  =  6"  (19821 

3440  LOCATE  28 ,24 : PRINT"END  =  7"  [13101 

3450  PEN  1: LOCATE  27,2: PRINT"SELECT  SHAPE"  [19641 
3460  LOCATE  27 , 4 : PRINT"-- >  ":shape$=INK  [49281 

EY$ : shape=VAL ( shape$  ) 

3470  IF  shape<1  OR  shape>7  THEN  3460  [14601 

3480  IF  shape=7  THEN  3790  [787] 

3490  LOCATE  31, 4: PRINT  shape  [8541 

3500  IF  shape=1  THEN  sh=1  [10851 

3510  IF  shape=2  THEN  sh=2  [567] 

3520  IF  shape=3  THEN  sh=4  (11041 

3530  IF  shape=4  THEN  sh=0  [13511 

3540  IF  shape=5  THEN  sh=3  [10951 

3550  IF  shape=6  THEN  sh=5  [316] 

3560  LOCATE  x,y:PEN  1: PRINT  CHR$ ( 22 ) ; "1  " ; c  [14731 
ursor$  ;CHR$  ( 22  ) ;  "0" 

3570  FOR  verzoe=1  TO  20:NEXT  [1488] 

3580  IF  JOY ( 0 ) <  >1  AND  INKEY(0)<>0  THEN  362  [2441] 
0 

3590  y=y-1 : IF  y<1  THEN  y=1  [18341 

3600  LOCATE  x, y+1 : PRINT  shape$ ( feld (x,y+1 )  [18261 

) 

3610  GOTO  3560  (4651 

3620  IF  JOY ( 0 ) <  >2  AND  INKEY(2)<>0  THEN  366  [3017] 
0 

3630  y=y+1:IF  y>25  THEN  y=25  [1338] 

3640  LOCATE  x,y-1: PRINT  shape$ ( f eld (x,y-1 )  [29531 


) 

3650  GOTO  3560 

3660  IF  JOY ( 0 ) <  >4  AND  INKEY(8)<>0  THEN  370 
0 

3670  x=x-1 : IF  x<1  THEN  x=1 

3680  LOCATE  x+1,y:PRINT  shape$ ( f eld ( x+1 , y ) 

) 

3690  GOTO  3560 

3700  IF  JOY ( 0 ) <  >8  AND  INKEY(1)<>0  THEN  374 
0 

3710  x=x+1 : IF  x>25  THEN  x=25 
3720  LOCATE  x-1,y:PRINT  shape$ ( f eld < x-1 ,y ) 
) 

3730  GOTO  3560 

3740  IF  JOY ( 0 ) <  >1 6  AND  INKEY ( 9 )  THEN  3770 
3750  feld(x,y)=sh 
3760  GOTO  3560 

3770  IF  INKEY { 47 ) =0  THEN  GOTO  3460 
3780  IF  INKEY ( 41 ) < >0  THEN  3560 
3790  LOCATE  x,y:PRINT  shape$ ( f eld (x,y ) ) 
3800  CLS#1 : PEN  1 :GOTO  3200 
3810  * 

3820  '  ==========================  störe  == 


(4651 

[23061 

[1791  1 
[2156  I 

14651 

(30651 

(2727  1 
(2310  1 

[4651 

(16391 

(1008  1 

[4651 

(9251 

[1120J 

(23701 

(8851 

(1171 

(3478) 


3830  ’  [117] 

3840  WINDOW# 1 ,26,40,1 ,25: CLS#  1  [19093 

3850  LOCATE  28 , 2 : PRINT"WHICH  LEVEL"  (23051 

3860  LOCATE  28 , 4 : PRINT"TO  STORE  ?"  [1845] 

3870  LOCATE  28 ,6: INPUT"- >", levelnr?  [1375] 

3880  levelnr=VAL( levelnr$ ) : IF  levelnr<1  OR  [42361 
levelnr >9  THEN  CLS#1:GOTO  3850 
3890  pokal( levelnr )=0: flaschet levelnr )=0  (15771 

3900  LOCATE  28,9: PRINT"PLEASE  WAIT."  (25701 

3910  FOR  y-1  TO  25  [1112] 

3920  FOR  x»1  TO  25  [768 J 


3930  POKE  ( 35000+ ( levelnr-1 )*628)+{(y-1)*2  13043] 
5)+x,feld(x,y) 

3940  IF  feld(x,y)=2  THEN  pokal  ( levelnr }  =po  (3692  1 
kalt levelnr  )+1 

3950  IF  feld(x,y)=4  THEN  flaschet levelnr )=  (31371 
flaschet levelnr )+1 

3960  NEXT  x,y  (5481 

3970  POKE  1 35000  + ( levelnr-1  ) *628 ) , pokal ( le  C3792  I 
velnr ) 

3980  POKE  ( 35000+t levelnr-1 ) *628 )-1 , flasch  12678] 
et levelnr  > 

3990  items ( levelnr ) «pokal ( levelnr )  +  f lasche  [32141 
( levelnr 1 


4000  IF  items ( levelnr ) >255  THEN  LOCATE  26, 
12: PRINT"TOO  MUCH  ITEMS. "LOCATE  26,14:PRIN 
T"REDEFINE  LEVEL. " :a$="" :WHILE  a$="":a$=IN 
KEYS: WEND : GOTO  3090 

4010  POKE  ( 35000+ ( levelnr-1 ) *628 ) -2 , items ( 
levelnr ) 

4020  POKE  40700+levelnr,1 

4030  LOCATE  28 , 1 2 : PR INT" LEVEL  STORED." 

4040  LOCATE  28 , 1 4 : PRINT"GO  ON  ..." 

4050  a$="":WHILE  a$<="” :a$=INKEY$ :WEND 
4060  GOTO  3090 
4070  ’ 

4080  '==========================  save  ==== 


4090  ' 

4100  WINDOW  #1  ,26,40,1  ,25:CLS#1 :PEN  1 
4110  LOCATE  27,2: PRINT"PRESS" 

4120  LOCATE  27,4: PRINT"PLAY  AND  REC" 

4130  LOCATE  27,6: PRINT"THEN  SPACE." 

4140  LOCATE  27 , 8 : PRINT"-- >" 

4150  WHILE  INKEY (47) <>0:WEND 
4160  LOCATE  32 , 8 : PRINT"O.K. " 

4170  LOCATE  27 , 1 1 : PRINT" PLEASE  WAIT." 

4180  LOCATE  27 ,23 :PRINT"SAVING  ..." 

4190  SAVE  "l",b, 34998, 6 002. -LOCATE  27,1  8  :  PR 
INT"GO  ON  . . . " : CALL  &BB03:CALL  &BB06:GOTO 
3010 
4200  ' 

4210  1  ========================  load  ====== 

4220  ' 

4230  WINDOW# 1  ,26,40,1  ,  25 :CLS#1  : PEN  1 
4240  LOCATE  27 , 2 : PRINT"PRESS  PLAY" 

4250  LOCATE  27,4: PRINT"THEN  SPACE." 

4260  LOCATE  27 ,6 : PRINT"-- >" 

4270  WHILE  INKEY ( 47 ) <>0 : WEND 
4280  LOCATE  32 > 6 : PRINT"O.K. " 

4290  LOCATE  27,11 : PRINT" PLEASE  WAIT." 

4300  LOCATE  27 , 24 : PRINT"LOADING  ..." 

4310  LOAD" !",34998: LOCATE  27 , 1 8 : PRINT"GO  O 
N  . . . " : CALL  &BB0 3 : CALL  &BB06:GOTO  3010 
4320  j 

4340  ' 

4350  WINDOW# 1 ,26,40,1 , 25 :CLS#1 : shape$ ( 5 ) =C 
HR$ ( 22 ) +"0"+"  " 

4360  LOCATE  27 , 2 : PRINT"WHICH  LEVEL" 

4370  LOCATE  27 , 4 : PRINT"TO  PLAY  ?" 

4380  LOCATE  27 , 6 : PRINT"-- >" 

4390  levelnr$="" : WHILE  levelnr$="" : levelnr 
$=INKEY$ : WEND 

4400  levelnr=VAL( levelnr? ) : IF  levelnr<1  OR 
levelnr >9  THEN  CLS#1 :GOTO  4360 
4410  IF  PEEK( 40700  +  levelnr ) <  >1  TUEN  LOCATE 
27,12: PRINT" I  DON'T  KNOW" : LOCATE  27,1 4 :PR 
INT"THIS  LEVEL.": LOCATE  27 , 20 : PRINT"GO  ON 
. . . " : CALL  &BB06:CLS#1 :GOTO  3200 
4420  LOCATE  32,6:PRINT  levelnr 
4430  FOR  y=1  TO  25 
4440  FOR  x=1  TO  25 

4450  feld(x,y)= (PEEK( (35000  +  ( levelnr-1  ) *62 
8)+((y-1 )*25)+x)) : LOCATE  x,y:PRINT  shape$( 
PEEK((35000+( levelnr-1 )*628)+(<y-1 )*25)+x) 
) 

4460  NEXT  x,y 

4470  pokale=PEEK( ( 35000+ ( levelnr-1 ) *628 ) ) 
4480  f  laschen=PEEI<(  ( 35000+  ( levelnr-1  )  *628  ) 
-1  ) 

4490  items=PEEK{ (35000  +  (levelnr-1  ) *628 ) -2 ) 
4500  level=levelnr: items ( level)=items 
4510  seif styled=1 :en=999:sc=0:it=0:CLS#1  :G 
OTO  1990 
4520  ' 

4530  '  ==================  alle  levels  gesc 

haf f t  =============================== 

4540  ' 

4550  MODE  1 

4560  POKE  &B28B, 1 20 

4570  FOR  a=1  TO  40:LOCATE  a,1: PRINT  shape$ 
(0); :NEXT 

4580  FOR  a=1  TO  25: LOCATE  40, a: PRINT  shape 
$ ( 0 ) ; :NEXT 

4590  FOR  a=40  TO  1  STEP  -1 : LOCATE  a,25:PRI 
NT  shape$  <  0 ) ; jNEXT 

4600  FOR  a=25  TO  1  STEP  -1: LOCATE  1,a:PRIN 

T  shape $ ( 0 J  j :NEXT 

4610  PEN  1: PRINT  CHR$ ( 22 ) ; "1 " 

4620  FOR  a«1  TO  40: LOCATE  a,1: PRINT  CHR$ [1 


(8643  1 


[2850  1 

[8951 
(23721 
[1110  1 
[1812  1 
[6301 
[117] 
(4024  1 

(1171 
[2042 1 
[11181 
[14691 
[2124  ] 
[1447  ]' 
[16421 
[14651 
[2036  1 
(18431 
(4941  1 


[117] 
[5805 1 

[117] 
[2042 1 
(1  6361 
(18471 
[12881 
[16421 
[580  1 
(2036  1 
[1929  1 
[4641  ) 

[1171 

(57081 

[.117] 
12741  ) 

(1308  1 
[12631 
[1288  1 
[2423  1 

(42301 

[9545  1 


[885) 

[11121 

(768) 

(8189) 


(5481 
[1992  1 
[2680  1 

(3464  1 
(23891 
(41171 

[117] 
(3686  1 

(1171 
(506) 
(659) 
(1  5591 

(1855  1 

[3751  ] 

[4240  1 

[2584] 

[22601 
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33 ) ; ;NEXT 

4630  FOR  a  =  1  TO  25:LOCATE  40,a:PRINT  CIIR$(  12091] 
133); :NEXT 

4640  FOR  a=40  TO  1  STEP  -1 :LOCATE  a,25:PRI  13797) 
NT  CHR$ (133);: NEXT 

4650  FOR  a=25  TO  1  STEP  -1 : LOCATE  1,a:PRIN  £3513) 
T  CHR$ (133); :NEXT 

4660  PRINT  CHR$ ( 22 ) ; "0"  [1 295  ) 

4670  LOCATE  5 , 3 : PRINT"YOU  HÄVE  COMPLETED  A  [3122] 
LL  9  LEVELS." 

4680  LOCATE  8,5: PRINT"THEREFORE  THE  GREAT  [1732] 
ORTWIN" 

4690  LOCATE  4 , 7 ; PRINT"WILL  PROTECT  ALL  YOU  14434) 
R  LATER  GAMES." 

4700  IF  sc<=hi  THEN  FOR  a=1  TO  2000;NEXT:G  [4609] 
OTO  4760  ELSE  hi=sc 

4710  LOCATE  3 , 1 0 : PRINT"ALSO  YOU  HAVE  BROKE  (3544) 
N  THE  HIGH -SCORE." 

4720  LOCATE  4 , 1 2 : PRINT" SO  YOU  ARE  WORTHY  T  [3776] 
O  BE  KNOWN  AS  AN" 


4730  LOCATE  1  4 , 1 4 : PRINT"ORTWIN  RUNNER."  (24491 
4740  LOCATE  9,16: PRINT"PLEASE  ENTER  YOUR  N  12937] 
AME  :" 

4750  LOCATE  9,20:CALL  &BB03 : INPUT" >" ,ortwi  [3735] 
n$ 

4760  WINDOW# 1 ,2,39,2,24: CLS#1  [1123] 

4770  LOCATE  8,5: PRINT"TODAYS  BEST  ORTWIN  R  [I960) 
UNNER : " 

4780  LOCATE  12,10:PRINT  UPPER$ {ortwin$ )  12249] 

4790  LOCATE  1 3 , 1 5 : PRINT"WITH" ;hi ; "POINTS"  [2786] 

4800  '  [117] 

4810  richard  wagner  -  brautchor  aus  ' lo  [2298] 
hengrin’ 

4820  '  [117] 

4830  RESTORE  4890  [757] 

4840  ENV  3,10,-1,10  [536] 

4850  READ  ton,dauer  [1018] 


4860  IF  ton=-1  THEN  FOR  i=1  TO  3000:NEXT:G  [3560] 
OTO  990 

4870  SOUND  1 , ton/2 ,dauer , 1 5 , 3 : SOUND  2, ton*  [5211] 
2 , dauer ,15,3: SOUND  4 , ton,dauer, 1 5 , 3 
4880  GOTO  4850  [409] 

4890  DATA  358,60,268,45,0,2,268,15,0,2,268  [7404] 

,120,358, 60, 239, 45, 284, 15, 2  68,1.?  0,3  58,60,2 


. . . . . . . Programme 

68,45,201 ,15,0,2,201 ,60,213,45,239,15,268, 

60.239.2.268.2.284.45.268.15.239.120 

4900  DATA  358,60,268,45,0,2,268,15,0,2,268  [6156] 
,120,358,60,239,45,284,1 5,268,120,358,60,2 
68,45,213,15,179,60,213,45,268,15,319,60,2 

39.45.213.15.268.120 

4910  DATA  358,60,268,45,0,2,268,15,0,2,268  [7404] 

,120,358,60,239,45,284,15,268,120,358,60,2 

68,45,201,15,0,2,201,60,213,45,239,15,268, 

60,239,2,268,2,284,45,268,1  5,239,120 

4920  DATA  358,60,268,45,0,2,268,15,0,2,268  [6371] 

,120,358,60,239,45,284,15,268,120,358,60,2 

68,45,213,15,179,60,21 3,45,268,15,319,60,2 


39,45,21  3,1 5,268,1 20,-1  ,-1 

4930  '  [117] 

4940  '  franz  Schubert  -die  forelle  [2462] 

4950  '  [117] 

4960  ENV  2, 10,-1 ,10  [662  J 

4970  RESTORE  5010  [924] 


4980  READ  ton,dauer:IF  ton— 1  THEN  RETURN  [6924] 
ELSE  IF  ton=0  THEN  SOUND  1 , ton , dauer : SOUND 
2, ton, dauer: SOUND  4 , ton, dauer: GOTO  4980 
4990  dauer=dauer *1 .5:SOUND  1 ,ton*2, dauer/2  [8290] 
,15, 2: SOUND  1 , ton , dauer/ 2 , 1 5 , 2 : SOUND  2, ton 
, dauer, 13, 2: SOUND  4,ton*0.25,dauer,1 5,2 
5000  GOTO  4980  [423) 

5010  DATA  426,25,319,25,0,2,319,25,253,25,  [63351 
0,2,253,25,319,50,426,25,0,2,426,25,0,2,42 
6,25,0,2,426,25,284,12,319,12,338,12,379,1 
2,426,75,0,2 

5020  DATA  426,25,319,25,0,2,319,25,253,25,  [55551 

0,2,253,25,319,50,426,25,319,25,338,25,379 

,12,338,12,319,25,451 ,25,426,75,0,2 

5030  DATA  426,25,338,25,0,2,338,25,319,12,  [5521] 

338,12,379,12,338,12,319,50,426,25,319,25, 

338,25,0,2,338,25,0,2,338,12,239,12,284,12 

,338,12,31 9,75,0,2 

5040  DATA  319,25,379,25,0,2,379,25,0,2,379  15205] 
,25,319,25,0,2,319,50,426,25,0,2,426,25,0, 
2,426,25,0,2,426,25,284,25,338,25,319,75,0 
,2 

5050  DATA  319,25,379,25,0,2,379,25,0,2,379  [5385] 
,25,319,25,0,2,319,50,426,25,0,2,426,25,0, 
2,426,25,0,2,426,25,284,25,338,25,319,75,- 
1,-1 


FÜR  NIX  GIBT’S  NIX 

Aber  für  gute  Programme  und  Tips  &  Tricks  umso  mehr 


Für  den 
Programmhit 
des  Monats 

1 0OO,- 


Und  für  den 
Top-Tip 
des  Monats 
ganze 

500- 


Das  sind  doch  gute  Argumente,  Ihr  Programm  auch 
einmal  zum  Hit  des  Monats  werden  zu  lassen. 
Probieren  geht  über  Studieren. 

Bitte  richten  Sie  Ihre  Einsendungen  an: 

DMV  Verlag,  Fuldaer  Str.  6,  3440  Eschwege 
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LASER  BASIC 


Hersteller:  Ocean 
Vertrieb:  Computer  Max 
Steuerung:  Tastatur 
Monitor:  Farbe/Grün 
Programm:  100%  M-Code 
Preis:  ca.  45-  DM 

CPC  464  H  CPC  664  B  CPC  6128  K 

Laser  Basic  ist  im  eigentlichen  Sinne 
eine  Basic-Erweiterung,  die  die  grafi¬ 
schen  Eigenschaften  des  CPCs  er¬ 
weitert.  Allerdings  geschieht  dies  in 
einem  solchen  Maße,  daß  man  hier 
beim  besten  Willen  nicht  mehr  von 
einer  gewöhnlichen  Erweiterung 
sprechen  kann.  Laser  Basic  wurde 
direkt  zur  Entwicklung  von  Spielpro¬ 
grammen  konzipiert  und  bietet  hier 
mit  über  200  neuen  Befehlen  einen  so 
komplexen  Leistungsumfang,  daß 
man  das  Programm  eher  schon  als 
Games-Designer  bezeichnen  kann. 
Die  200  Befehle  splitten  sich  auf  in 
einen  großen  Block  zur  Spritedarstel- 
lung  und  bieten  hiervon  Bewegungs¬ 
und  Animationsroutinen  über  Ver¬ 
größerungsbefehle  bis  hin  zu  Kol¬ 
lisionsabfragen  mit  allem,  was  sich 
am  Bildschirm  darstellen  läßt,  so 
ziemlich  jede  Möglichkeit,  die  man 
sich  überhaupt  vorstellen  kann. 

Da  die  Abarbeitung  der  Sprites  direkt 
über  Manipulationen  der  Bitmap  er¬ 
folgt,  tritt  auch  bei  20  gleichzeitig  am 
Bildschirm  bewegten  Sprites  noch 
keine  nennenswerte  Zeitverzögerung 
oder  Flimmern  auf.  Ein  komfortabler 
Sprite-Editor  erleichtert  das  Erstellen 
dieser  Grafiken  in  beliebiger  Größe 
und  Farbwahl. 

Die  restlichen  Befehle  ermöglichen 
die  bekannten  Bildschirmmanipu¬ 
lationen  wie  Banking,  Splits,  Mehr- 
fachmodes  usw.  Außerdem  gibt  es 
noch  Befehle  zur  Interruptsteuerung 
von  Programmen  und  Tonfolgen. 
Hat  man  einmal  alle  Interrupts  des 
Basic  gestartet,  so  kann  man  am 
Bildschirm  im  Direktmodus  20  ani¬ 
mierte  Sprites  in  mehreren  Modes  be¬ 
wegen  und  dazu  noch  eine  tolle  Hin¬ 
tergrundmusik  laufen  lassen,  ohne 
ein  einziges  Mal  RUN  eingegeben  zu 
haben. 

Laser  Basic  scheint  tatsächlich  das 
ultimative  Tool  für  den  Spiele¬ 


programmierer  zu  sein.  Neben  dem 
eigentlichen  Basic  ist  gleich  noch  ein 
passender  Compiler  für  die  neuen 
und  alten  Befehle  des  CPC  erhältlich, 
mit  dem  man  aus  seinen  Laser  Basic- 
Programmen,  Stand-Alone- Spiele  ma¬ 
chen  kann,  die  die  eigentliche  Erwei¬ 
terung  nicht  mehr  benötigen,  frei  von 
Copyrights  sind  und  vermarktet  wer¬ 
den  können.  Bei  Ocean  in  Arbeit  be¬ 
findet  sich  noch  ein  Screendesigner 
und  ein  Soundeditor,  mit  denen  der 
Umgang  mit  dem  ganzen  System  noch 
vereinfacht  werden  soll. 

Allerdings  hat  eine  so  große  Anzahl 
von  Befehlen  auch  einen  riesigen 
Nachteil.  Um  nicht  unnötigen  Spei¬ 
cherplatz  zu  verschwenden,  hat  man 
sich  bei  den  Befehlsnamen  auf  drei 
Buchstaben-Kommandos  beschränkt. 
Bei  200  Befehlen,  die  alle  MSP,  LSP, 
CLI  oder  SOO  heißen,  kann  selbst  ein 
versierter  Programmierer  ins  Schwit¬ 
zen  kommen,  da  sich  von  den  Kom¬ 
mandoformen  auf  die  Auswirkung 
des  Befehls  keinerlei  Schluß  mehr 
ziehen  läßt.  Aber  es  gibt  ja  ein  150- 
seitiges  deutsches(ü)  Handbuch,  wel¬ 
ches  über  die  Grundlagen  der  Spie¬ 
leprogrammierung  und  die  Anwen¬ 
dung  von  Sprites  im  allgemeinen 
informiert. 

Bei  einer  derartig  guten  und  komplet¬ 
ten  Befehlssammlung  dürfte  in  den 
nächsten  Monaten  mit  einem  Boom 
auf  dem  Spielesektor  zu  rechnen  sein 
und  so  manche  Spielidee,  die  im  Hin¬ 
terkopf  eines  Programmierers  her¬ 
umschwirrte  und  bislang  in  Erman¬ 
gelung  der  nötigen  Programmier¬ 
kenntnisse  ein  Schattendasein  fri¬ 
stete,  bekommt  nun  doch  noch  ihre 
Chance,  irgendwann  einmal  über 
den  Bildschirm  zu  flimmern. 

(TM) 


VECTOR 

Hersteller:  GFA 
Vertrieb:  GFA 
Steuerung:  Tastatur 
Monitor:  Farbe/Grün 
Programm:  Basic/M-Code 
Preis  auf  Anfrage 

CPC  464  E  CPC  664  Kl  CPC  6128  R 

Dreidimensionale  Grafiken,  die  in 
der  Gitterstruktur  am  Bildschirm 
dargestellt  werden,  haben  eine  Faszi¬ 


nation,  der  sich  kein  echter  Compu¬ 
terfreak  entziehen  kann. 

Fangen  sich  diese  Grafiken  dann 
auch  noch  an  zu  drehen  und  zu  bewe¬ 
gen,  wie  beispielsweise  die  Raum¬ 
schiffe  in  Spielen  wie  Elite  oder 
Starion,  so  geraten  die  Fans  völlig  aus 
dem  Häuschen. 

Vektorgrafik  ist  eines  der  faszinie¬ 
rendsten  Themen,  auf  dem  Gebiet 
der  Computeranimation.  Leider  las¬ 
sen  sich  diese  rotierenden  Gebilde 
sehr  schlecht  in  Eigenarbeit  pro¬ 
grammieren.  In  Basic  läuft  da  gar 
nichts. 

Bei  einer  echten  Vektorgrafik  wird 
nach  jeder  gezogenen  Linie  die  näch¬ 
ste  errechnet,  gezeichnet  und  die  alte 
gelöscht.  Mit  nur  einer  Linie  läßt  sich 
hierbei  auch  schon  ein  annehmbares 
Ergebnis  erzielen.  Kommen  jedoch 
mehrere  Dimensionen  hinzu  und  die 
Anzahl  der  zu  zeichnenden  Linien 
übersteigt  die  Zahl  3.  so  verlangsamt 
sich  das  Berechnen  der  neuen  Linie 
den  Zeichenvorgang  so  sehr,  daß  eine 
ruck-  und  flimmerfreie  Darstellung 
nicht  mehr  möglich  ist.  Abhilfe 
schafft  hier  nur  die  Programmierung 
in  Maschinensprache  oder,  wenn 
man  es  so  einfach  wie  möglich  haben 
will,  das  Programm  VECTOR  der 
Firma  GFA. 

Geschrieben  hat  das  Programm  kein 
Geringerer  als  der  CPC-Grafik-Spe- 
zialist  J.  Abel,  der  sein  Können  schon 
bei  der  Entwicklung  des  Profi  Pain- 
ters  unter  Beweis  stellte. 

VECTOR  hat  nichts  mehr  mit  her¬ 
kömmlichen  Grafikprogrammen  ge¬ 
mein.  Nicht  die  Darstellung  mög¬ 
lichst  präziser  2D-Zeichnungen.  son¬ 
dern  echte  Bewegung  am  Bildschirm 
ist  hier  gefragt. 

Um  ein  dreidimensionales  Objekt  am 
Bildschirm  zu  bewegen,  müssen  erst 
einmal  die  Form  und  die  Eckdaten 
der  Grafik  festgelegt  werden. 

Dies  kann  bei  VECTOR  über  zwei 
Wege  geschehen.  Zum  einen  kann 
das  Objekt  auf  Papier  in  einem  Koor¬ 
dinatensystem  entworfen  werden 
und  die  Daten  werden  dann  einfach 
in  tabellarischer  Form  eingegeben, 
oder  man  entwirft  direkt  am  Bild¬ 
schirm  mit  einem  3D-Grafikeditor. 
Zur  Handhabung  des  Grafikeditors 
ist  ein  klein  wenig  räumliches  Den¬ 
ken  und  ein  Verstehen  der  Grundla¬ 
gen  der  3D-Grafik  vonnöten.  Ein  ge¬ 
sondertes  Kapitel  im  Handbuch  ver¬ 
mittelt  dieses  Grundwissen  jedoch 
auf  eine  sehr  klare  und  verständliche 
Weise. 

Ist  ein  Objekt  fertig  definiert,  wird  es 
in  die  Objektbibliothek  aufgenom¬ 
men  und  kann  von  hieraus  abgespei- 
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chert,  ausgedruckt,  editiert  und  ge¬ 
zeigt  werden.  Die  Option  "Objekt 
Zeigen”  bringt  dem  Anwender  auch 
gleich  das  erste  Erfolgserlebnis.  Mit 
fünf  Tasten  kann  das  Objekt  kon¬ 
tinuierlich  um  alle  drei  Achsen  rotiert 
werden  und  stufenlos  vergrößert  und 
verkleinert  werden.  Dabei  sind  255 
Eckpunkte  mit  den  entsprechenden 
Verbindungen  möglich.  Selbstver¬ 
ständlich  ist  man  beim  Anlegen  von 
Objekten  nicht  nur  auf  eins  be¬ 
schränkt. 

Nachdem  man  sich  nun  an  dem  dre¬ 
henden  und  rotierenden  Ding  sattge¬ 
sehen  hat,  fragt  man  sich,  wo  nun 
eigentlich  der  Einsatzzweck  dieser 
Grafiken  ist.  Nun  tritt  die,  meiner 
Meinung  nach,  stärkste  Option  des 
Vectorprogramms  in  Arbeit.  Alle  er¬ 
zeugten  Objekte  können  in  einer 
Binärdatei,  die  gleichzeitig  auch 
noch  die  nötigen  RSX-Befehle  zur 
Animation  der  Objekte  enthält,  abge¬ 
legt  werden  und  somit  in  eigenen 
Basic-Programmen  untergebracht 
werden. 

Damit  sind  dem  Anwender  nur  noch 
Grenzen  durch  seine  eigene  Phan¬ 
tasie  gesetzt.  Ob  nun  zu  Demo- 
Zwecken,  als  Ladebild,  als  Bestand- 


Hier  sehen  Sie  ein¬ 
mal  das  CPC-Logo 
von  hinten.  Mit  dem 
Vector  Grafik  Editor 
recht  schnell  und 
einfach  erstellt  und 
danach  im  Zeige- 
Modus  um  alle  Ach¬ 
sen  gedreht. 

Leider  läßt  sich  hier 
die  wunderschöne, 
flackerfreie  Bewe¬ 
gung  nicht  darstel¬ 
len.  Aber  wir  wollten 
Ihnen  auf  diese 
Weise  einmal  be¬ 
antworten,  wie  das 
mittlerweile  be¬ 
kannte  Emblem  aus 
einer  neuen  Per¬ 
spektive  aussieht. 


teil  eigener  Spiele  oder  bei  2D- 
Darstellung  als  Sprite-Ersatz  -  hier 
stehen  alle  Möglichkeiten  offen.  Als 
zusätzlichen  Bonus  bekommt  der 
Spieleprogrammierer  noch  die  Mög¬ 
lichkeit,  16  interruptgesteuerte  "Schüs¬ 
se",  die  völlig  unabhängig  vom  Basic- 
Programm  laufen,  in  seine  Program¬ 
me  zu  implementieren. 

VECTOR  ist  eine  völlig  neue  Pro¬ 
grammidee  und  stellt  eine  Versu¬ 
chung  dar,  der  sich  kaum  ein  Compu¬ 
teranwender  widersetzen  kann.  Wer 


sich  einmal  in  aller  Ruhe  die  ca.10- 
minütige  Demo  des  Programms  an¬ 
gesehen  hat.  wird  bass  erstaunt  sein, 
zu  welchen  grafischen  Gewaltakten 
sein  "kleiner"  8-Biter  fähig  ist. 

(TM) 
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Warum  sollten  Sie  mit  weniger 
zufrieden  sein? 
Kommerzielle  Software  für  die 
Schneider  CPC  Computer 
und 


•  AUFTRAGSBEARBEITUNG  BM  5.0/T  für 

JOYCE  u.  CPC  6128  wahlweise 
mit  einem  oder  zwei  Laufwerken. 
Das  Programm  verwaltet  Firmen  - 
Kunden- Artikel  u.  Lieferanten¬ 
stamm. 

Ausgedruckt  werden:  Angebot  - 

Auftragsbestätigung  -  Lieferschein 

-  Rechn  ung-  Proformarechnung  - 
Wareneingang  -  Gutschrift  u.  Be¬ 
stellung. 

Umsatz  u.  Rohgewinnstatistiken 
über  Kunden  -  Lieferanten  -  u.  Ar¬ 
tikel,  Lagerbestandsiiste,  Bestell¬ 
vorschläge. 

Kunden  -  Lieferanten  -  Artikel  - 
Preis  und  Inventurlisten. 

Der  Speicherplatz  wird  dynamisch 
verwaltet,  d.h.  auf  einer  178  KB- 
Diskette  können  z.B.  300  Kunden/ 
Lieferanten  u.  1300  Artikel  bearbei¬ 
tet  werden.  Für  jeden  Stamm  kann 
auch  eine  separate  Diskette  ange¬ 
legt  werden. 

Beim  JOYCE4-  werden  1 000  Kun¬ 
den,  600  Lieferanten  u.  5000  Arti¬ 
kel  verwaltet. 

3”-Diskette  mit  Handbuch  448.00  DM 

•  ADRESSVERWALTUNG  für  Joyce,  CPC 
6128,  664  u.  464  m.  einem  oder 
zwei  Laufwerken.  Verwaltung  von 
1 1 00  Adressen  mit  einem  Laufwerk 

-  2000  Adressen  mit  zwei  Laufwer¬ 
ken  -  mehrere  Sortiermöglichkei¬ 
ten  -  Infozeilen  -  Serienbrief  - 
Adressaufkleberdruck. 

3”-Diskette  mit  Handbuch  128.00  DM 


Von  Profis  erstellte  Software 
zu  einem 

marktorientierten  Preis 


•  VEREINSVERWALTUNG  für  JOYCE,  CPC 
6128,  664  u.  464  m.  einem  oder 
zwei  Laufwerken. 

Verwaltung  von  750  Mitgliedern  mit 

einem  Laufwerk- 1 500  Mitgliedern 
mit  zwei  Laufwerken  -  mehrere 
Sortiermöglichkeiten  -  Infozeilen 

-  Serienbrieferstellung  -  Adress¬ 
aufkleberdruck-  Druck  von  Bank¬ 
einzugsformularen  und  Überwei¬ 
sungsträgern  -  Einnahme  und  Aus¬ 
gaberechnung  max.  60  Konten. 

3”-Diskette  mit  Handbuch  248.00  DM 

•  FIBU  BM  1.0/T  für  JOYCE/61  28/664 
u.  464  u.  5  1  /4”  (Vortex)  wahlweise 
mit  einem  oder  zwei  Laufwerken. 
1 50  Konten  -  bis  5-stellige  Kon- 
tonr.  -  Kontenrahmen  frei  wählbar 

-  1750  Buchungen  pro  Monat -8 
Steuerschlüssel  mit  2  Nachkom¬ 
masteilen  definierbar  -  Drucker¬ 
anpassung. 

Druckerausgaben:  Konten  einzeln 
(auch  Bildschirm)-  Konten  alle  bei 
Monatsabschluß  -  Kontenplan  - 
Umsatzsteuervoranmeldung  (auch 
am  Bildschirm)-  Buchungsjournal 

-  Saldenliste  -  Monats-  und  Jah¬ 
resabschluß  mit  Saldenvortrag  (Er¬ 
öffnungsbilanz)  -  BWA 

3”-Diskette  mit  Handbuch  398.00  DM 


”BYTE  ME”  Computersysteme 
Wilhelmstraße  7 
5240  Betzdorf 
Tel.:  02741 723537  &  231 07 


Alle  Programme  sind  in  TURBO-PASCAL 
geschrieben. 

Demoversionen  für  FIBU;  AUFTRAGS¬ 
BEARBEITUNG,  VEREINSV.  ä  25.00  DM 

Fragen  Sie  bitte  den  Preis  für  Kom- 
plettpakete  an! _ 
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AMX-Utitities 

Hersteller:  AMX 
Vertrieb:  AMX 
Steuerung:  Maus 
Monitor:  Farbe/Grün 
Programm:  Basic/M-Code 
Preis  auf  Anfrage 

CPC  464  B  CPC  664  81  CPC  6128  8 

Auf  sehr  schöne  Art  und  Weise  zeigt 
die  Firma  Advanced  Memory  Sy¬ 
stems.  daß  sie  die  Käufer  ihres  Maus¬ 
systems  nicht  auf  sich  gestellt  lassen, 
sondern  weiterhin  mit  qualitativ 
guter  Software  versorgen. 

Das  AMX-Utilities-Paket  enthält 
einen  Screeneditor,  einen  komforta¬ 
blen  Druckertreiber  und  ein  Slide- 
Show-Programm. 

Mit  dem  Screeneditor  können  Grafi¬ 
ken,  die  mit  dem  im  AMX- 
Mauspaket  enthaltenen  ART- Pro¬ 
gramm  erstellt  wurden,  nachbehan¬ 
delt  werden.  Dazu  bietet  das 
Programm  Spiegel  ungs-  und  Rota¬ 
tionsbefehle,  mit  denen  entweder  die 
ganze  Grafik  oder  Ausschnitte  ge- 
scrollt,  gespiegelt,  gedreht,  vergrößert 


oder  verkleinert  werden. 

Außerdem  steht  eine  RAM-Disk  zur 
Verfügung,  auf  der  Bildschirmaus¬ 
schnitte  gespeichert  werden  können 
und  sich  danach  als  Pinsel  definieren 
lassen.  Selbstverständlich  erfolgt  die 
komplette  Steuerung  über  Ikon- 
Symbole  mit  der  Maus. 

Das  Grafikprogramm  orientiert  sich 
dabei  an  Grafiksystemen,  wie  sie  auf 
den  16-Bit-Rechnern  der  letzten  Ge¬ 
neration  üblich  sind,  und  kann  (zwar 
bei  niedrigerer  Auflösung)  den  Bedie¬ 
nungskomfort  recht  gut  emulieren. 
Die  Zoom-  und  Shrink-Option,  die 
eine  Vergrößerung  oder  Verkleine¬ 
rung  von  Bildschirmausschnitten  er¬ 
laubt,  ist  besonders  interessant. 
Bildschirmausschnitte  können  wahl¬ 
weise  um  die  X-  oder  Y-Achse  ver¬ 
größert  oder  verkleinert  werden. 

Der  neue  Druckertreiber  ermöglicht 
Hardcopys  auf  nahezu  allen  Druk- 
kern  im  DIN-A4-Format.  Auch  hier 
erfolgt  die  Steuerung  über  Ikon-  und 
Pull-Down-Menues.  Die  Hardcopy 
geht  dabei  recht  schnell  vonstatten. 
Eine  nette  Option  ist  die  Slide-Show, 
mit  der  erstellte  Grafiken  kontinuier¬ 
lich  am  Bildschirm  ausgegeben  wer¬ 
den  können.  Die  Reihenfolge  der 


Grafiken  ist  frei  wählbar. 

Um  mit  der  Utilities-Diskette  arbei¬ 
ten  zu  können,  muß  zunächst  die 
Option  MAKEDISC  aufgerufen  wer¬ 
den,  die  alle  benötigten  Programme 
der  Master- Dis  kette  und  der  Utilities- 
Diskette  auf  eine  Workdisc  überträgt. 
So  ist  der  Anwender  sicher  vor 
Programmverlust  und  hat  alle  An¬ 
wendungen  auf  einem  Datenträger 
versammelt. 

Das  Utilities-Paket  ist  eine  schöne 
Idee,  auf  die  sicherlich  schon  so  man¬ 
cher  Anwender  gewartet  hat.  Daß 
AMX  hiermit  noch  nicht  am  Ende  ist, 
beweist  der  Pagemaker  sowie  ein 
Soundeditor,  die  sich  noch  in  Arbeit 
befinden,  von  deren  Demos  die  engli¬ 
schen  Fachmagazine  schon  in  höch¬ 
sten  Tönen  schwärmen. 

Sobald  diese  Programme  in  Deutsch¬ 
land  verfügbar  sind,  werden  wir 
darüber  berichten.  (TM) 
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HEAVY  ON  THE  MAGICK 

Hersteller:  Gargoyle  Games 
Vertrieb:  Fachhandel 
Steuerung:  Tastatur 
Monitor:  Farbe/Grün 
Autor:  Greg  Follis 
Programm:  100%  M-Code 
Preis:  ca.  30,-  DM 

CPC  464  ^  CPC  664  &CPC  6128 
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Durch  eine  leicht  mißglückte  Be¬ 
schwörung  wurde  Axil  der  Fähige  in 
ein  seltsames  Labyrinth  versetzt. 
Unter  den  Ruinen  der  alten  Burg  Col- 


lodons  Pile  findet  sich  Axil  in  einem 
Raum  wieder,  in  dem  sich  ein  uraltes 
Zauberbuch  befindet.  Für  Axil,  einen 
hoffnungsvollen  Nachwuchs-Magi- 
cker,  eine  hochinteressante  Entdek- 
kung. 

Natürlich  wird  das  gefundene  Magie- 
Nachschlagewerk  erst  einmal  gründ- 
lichst  untersucht.  Was  Axil  aber  zu 
diesem  Zeitpunkt  noch  nicht  weiß, 
bringt  ihn  in  tödliche  Gefahr.  Das 
Buch  war  nämlich  durch  einen  be¬ 
sonderen  Zauber  geschützt. 
Nachdem  es  von  seinem  Platz  ent¬ 
fernt  wurde,  sind  alle  Monster,  Gei¬ 
sterund  Ungeheuer,  denen  das  unter¬ 
irdische  Labyrinth  als  Behausung 
dient,  hinter  dem  ruchlosen  Dieb  her, 
um  ihm  so  schnell  wie  möglich  den 
Garaus  zu  machen.  Alles  in  allem  hat 
Axil  eine  ganze  Menge  Probleme. 
Der  einzige,  der  ihm  bei  der  Bewälti¬ 
gung  helfen  kann,  ist  der  Spieler,  der 
sich  dieses  gelungene  Spiel  in  seinen 
Rechner  einlädt. 

Mit  "Heavy  on  the  Magick"  präsen¬ 
tiert  das  englische  Softwarehaus  Gar¬ 
goyle  Games  ein  in  vielerlei  Hinsicht 
neuartiges  Programm. 

Die  Abenteuer  von  Axil  dem  Fähigen 
sind  in  gewisserWeise  eine  Mischung 
aus  Abenteuer  und  Rollenspiel.  Die 
auftretenden  Monster  und  Axil  verfü¬ 
gen  über  gewisse  Charaktereigen¬ 
schaften,  aus  diesen  lassen  sich  ge¬ 


wisse  Fähigkeiten,  z.B.  die  Zauberei, 
ablesen.  Einerseits  gilt  es,  durch  Her¬ 
umlaufen  und  Untersuchen  des  La¬ 
byrinths,  den  Ausgang  zu  finden,  an¬ 
dererseits  gibt  es  dort  aber  eine  ganze 
Reihe  von  Türen,  die  sich  nicht  so 
ohne  weiteres  öffnen  lassen.  Um  dort 
hindurch  zu  gelangen,  ist  es 
notwendig,  die  für  die  jeweilige  Tür 
geltenden  Paßwörter  zu  kennen  oder 
in  Erfahrung  zu  bringen.  Zu  diesem 
Zweck  ist  es  ratsam,  sich  an  eines  der 
herumstreunenden  Monster  zu  wen¬ 
den  und  sich  ein  wenig  mit  ihm  zu 
unterhalten.  Einer  der  besten  Infor¬ 
mationslieferanten  ist  Apex  der  Oger. 
Dieser  wird  Ihnen  sicherlich  schon 
sehr  bald  über  den  Weg  laufen. 

In  Punkto  Grafik  hat  'Heavy  on  the 
Magick"  ebenfalls  einiges  vorzuwei¬ 
sen.  Obwohl  die  Auflösung  recht  grob 
ist,  gelang  es  den  Programmierern, 
Beachtliches  auf  die  Beine  zu 
stellen. 

Ob  nun  Axil  oder  Apex  der  Oger  über 
den  Bildschirm  marschiert,  ob  sich 
eine  Riesenvieper  zum  Angriff  zu¬ 
sammenschlängelt,  man  hat  je¬ 
desmal  beim  Auftreten  einer  animier¬ 
ten  Figur  den  Eindruck,  einem  Zei¬ 
chentrickfilm  zuzusehen.  Auch  vom 
Sound  her  ist  einiges  Positives  über 
dieses  Spiel  zu  vermelden;  zum  Titel¬ 
bild  spielt  das  Programm  ein  wirklich 
gelungenes  Musikstück,  das  der  At- 
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mosphäre  des  Spieles  gerecht  wird. 
Im  eigentlichen  Spiel  selbst  sind 
dann  zwar  nur  Geräuscheffekte  ent¬ 
halten.  aber  die  erfüllen  ihren  Zweck 
voll  und  ganz. 

Gargoylc  Games  hat  in  der  dem  Spiel 
beiliegenden  Anleitung  auf  weitere 
Programme,  in  denen  Axil  der  Fähige 
die  Hauptrolle  spielt,  hingewiesen. 
Nach  den  Qualitäten,  die  "Heavy  on 
the  Magick"  vorzuweisen  hat,  darf 
man  sicherlich  auch  auf  die  angekün¬ 
digten  Fortsetzungen  gespannt  sein. 

(HS) 


WINTER  G  AH  ES 

Hersteller:  Epyx 
Vertrieb:  Fachhandel 
Steuerung:  Joystick 
Monitor:  Farbe/Grün 
Programm:  100%  M-Code 
Preis:  ca.  48  -  DM 

CPC  464  B  CPC  664  JS  CPC  6128  W 

Nun  ist  es  endlich  da!  Das  legendäre 
Sportspiel,  das  auf  den  Commodore- 
Computern  neue  Maßstäbe  für  Gra¬ 


phik  und  Spielbarkeit  bei  Computer¬ 
spielen  setzte.  Durch  den  massiven 
Erfolg  der  CPC’s  wurde  natürlich 
schon  sehr  bald  an  eine  Umsetzung 
in  Z-80-Code  gedacht.  Diese  Tatsa¬ 
che  allein  ist  recht  löblich.  Allerdings 
geht  mit  ihr  eine  Unsitte  Hand  in 
Hand,  über  die  ich  hier  am  besten 
einmal  ein  paar  Worte  verliere.  Wer 
ab  und  zu  die  Anzeigen  von  Software¬ 
händlern  durchgeht,  dem  dürfte 
sicherlich  aufgefallen  sein,  daß  WIN¬ 
TER  GAMES  seit  gut  einem  halben 
Jahr  beworben  wird,  allerdings  erst 
seit  einem  Monat  im  Handel  ist. 
Große  Softwarefirmen  neigen  dazu, 
Produkte  schon  lange  vor  der  ei¬ 
gentlichen  Fertigstellung  anzuprei¬ 
sen.  Bei  den  Schneiderrechnern  ist 
diese  unerfreuliche  Tatsache  zumeist 
im  Zusammenhang  mit  Program¬ 
men,  die  erst  von  anderen  Rechnerty¬ 
pen  übernommen  werden  müssen,  zu 
beobachten. 

Mit  wenig  Überlegung  kommt  man 
sehr  schnell  zu  dem  Schluß,  daß  hier 
auf  gewisse  Art  und  Weise  Vorablor¬ 
beeren  einkassiert  werden  sollen. 
Denn  zumeist  sind  es  Programme, 
die  auf  den  Rechnern,  auf  denen  sie 
ursprünglich  implementiert  wurden, 
enthusiastisch  gefeiert  wurden.  Sei 
dies  nun  wegen  der  phantastischen 


Unversehens  findet 
sich  Axil  der  Fähige 
in  einem  ausgedehn¬ 
ten  unterirdischen  La¬ 
byrinth  wieder,  das 
von  einer  Vielzahl 
seltsamer  und  unheim¬ 
licher  Wesen  bevöl¬ 
kert  wird.  Im,  auf 
seine  Weise,  klassi¬ 
schen  Gargoyle-Spiel- 
sy stem  gestaltet,  ist 
HEA  VY  ON  THE 
MAGICK  eine  der 
interessantesten  Neu¬ 
erscheinungen  der 
letzten  Tage.  Action 
und  Abenteuer  geben 
sich  hier  ein  Stell¬ 
dichein. 
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WINTER  GAMES 
die  Sportsimulation 
einer  winterlichen 
Olympiade  ist  end¬ 
lich  auch  für  die 
CPC's  erhältlich. 
Negativ  fällt  hier 
vor  allem  die  bei  der 
Kassettenversion  nerv¬ 
tötende  Ladezeit  auf. 
Abgesehen  davon,  ist 
WINTERGAMES  ei¬ 
gentlich  das,  was 
sich  viele  Sportfans 
erhofft  hatten  -  eine 
gelungene  und  gut 
spielbare  Sportsimu¬ 
lation. 


Graphik  oder  der  Animation  oder 
Gott  weiß  warum.  Sollen  diese 
erstklassigen  Effekte,  die  nur  durch 
perfekte  Programmierung  erreicht 
werden  können,  nun  von  einem  Pro¬ 
zessortyp  auf  einen  anderen  übertra¬ 
gen  werden,  und  dabei  auch  nichts 
von  ihrer  Qualität  verlieren,  so  ver¬ 
steht  sich  das  von  selbst,  daß  auch  in 
diesem  Falle  ein  nicht  geringer  Auf¬ 
wand  betrieben  werden  muß.  Daß 
sich  die  Softwarehäuser  in  solchen 
Fällen  mit  der  Ankündigung  von 
Erstverkaufsterminen  sehr  gerne  zu 
ihren  Gunsten  vertun  (oder  wie  es 
scheint,  sogar  mit  Absicht  falsche  Da¬ 
ten  nennen)  ist  zwar  gang  und  gäbe, 
sollte  aber  meines  Erachtens  in  bei¬ 
derseitigem  Interesse  abgestellt  wer¬ 
den. 

Nun  ist  WINTER  GAMES  aber  ein 
Spiel,  auf  das  sich  das  Warten  wirk¬ 
lich  gelohnt  hat.  Zwar  ist  das  erste, 
was  auffällt,  die  absolut  ätzende  La¬ 
dezeit  der  Kassette.  Verschärft  wird 
dieses  Manko  von  der  Tatsache,  daß 
jeweils  nur  zwei  Disziplinen  gleich¬ 
zeitig  im  Speicher  des  Rechners  ver¬ 
bleiben.  Möchte  man  nun  also  ein¬ 
mal  komplett  alle  Disziplinen  durch¬ 
exerzieren,  muß  man  sich,  allein 
für  eine  Runde,  auf  eine  Wartezeit 
von  gut  20  Minuten  einrichten.  Aber 
es  ist  noch  nicht  aller  Tage  Abend, 
und  eine  Diskversion  kommt  be¬ 
stimmt. 

Die  Disziplinen,  die  einem  hier  auf 
diesem  winterlichen  Computersze¬ 
nario  geboten  werden,  sind:  Eis¬ 
kunstlauf  und  Eiskunstlaufkür,  Eis¬ 
schnellauf,  Skiartistik  (Hot  doging), 
Skispringen,  Biathlon  und  Bobfah¬ 
ren.  Jede  dieser  Disziplinen  zeichnet 
sich  durch  ausgezeichnete  Graphi¬ 
ken,  sowohl  Hinter-  wie  Vordergrund, 
eine  ausgeklügelte  Steuerung  und 
passende  Musik  aus.  Einige  der 
Disziplinen,  wie  z.B.  der  Eiskunstlauf 
und  Biathlon,  dauern  pro  Durchgang 


ca.  5  Minuten.  Andere  wiederum  nur 
wenige  Sekunden  (Skispringen). 
Kommt  es  nun  vor,  daß  man  die  ge¬ 
samten  Winterspiele  durchspielt,  ge¬ 
stalten  sich  die  Spiel-  und  Ladezeitin¬ 
tervalle  sehr  unterschiedlich,  biswei¬ 
len  nervtötend.  Aber  wie  bereits 
erwähnt,  sind  das  eigentliche  neben¬ 
sächliche  Mängel,  die  bei  einer  Disk¬ 
version  sicherlich  nicht  mehr  ins  Ge¬ 
wicht  fallen.  Alles  in  allem  ist  Winter¬ 
games  ein  Spiel,  das  sich  am  besten 
mit  einigen  Leuten  zusammenspie¬ 
len  läßt.  Rekordjagden  machen  auf 
diese  Art  und  Weise  ungemein  viel 
Spaß.  Es  ist,  so  kann  man  mit  Fug  und 
Recht  behaupten,  wohl  die  beste 
Sportspielsimulation,  die  es  bisher 
für  die  Schneiderrechner  gibt. 

(HS) 


SBEUDEE  BEOIENUNGS-  DOKUMENfAnON  GRSRK  SOUND  Pl.EiS/lEISTUNG 


1 

T 

2 

3 

■ 

4 

u 

b 

1 

6 

J 

7 

J 

8 

9 

1 

IC 

J 

TOMAHAWK 

Hersteller:  Digital  Integration 
Vertrieb:  Fachhandel 
Steuerung:  Joystick  4-  Tastatur 
Programm:  100%  M-Codc 
Preis:  ca.  35,-  DM 

CPC  464  8  CPC  664  8.CPC  6128  Xi 

Nach  wie  vor  erfreuen  sich  Flugsimu¬ 
latoren  aller  Fasson  einer  wachsen¬ 
den  Beliebtheit.  Eines  der  größten 
Hindernisse,  die  einem  ergiebigen 
Spielerlebnis  mit  einer  solchen  Simu¬ 
lation  im  Wege  stehen,  ist  die  zumeist 
verwirrende  Fülle  von  Bedienungs¬ 
komponenten.  Einerseits  resultiert 
diese  Vielzahl  von  Instrumenten  aus 
den  Bestrebungen  der  Programmie¬ 


rer,  die  Simulation  so  realistisch  wie 
möglich  zu  gestalten,  andererseits  der 
Unfähigkeit,  diese  Bedienungsele¬ 
mente  in  eine  ergometrische,  bedien¬ 
bare  Form  zu  bringen.  Ehrlich  gesagt, 
hat  mir  dieser  Sachverhalt  das  Spie¬ 
len  solcher  Flugsimulationen  mei¬ 
stens  vergeht.  Denn  Tatsache  ist,  daß 
ein  durchschnittlich  lernfähiger 
Mensch  meist  zwei  bis  vier  Wochen 
braucht,  bis  ihm  ein  fehlerfreier  Flug 
gelingt.  Sicherlich  können  Sie  nun 
verstehen,  daß  ich  auch  "TOMA¬ 
HAWK"  anfangs  recht  skeptisch  ge¬ 
genüber  stand.  Zwar  wird  hier  mit 
einem  Hubschrauber  geflogen,  aber 
letztendlich  ändert  das  nichts  daran, 
daß  es  sich  auch  hier  um  einen  Flug¬ 
simulator  handelt.  An  meiner  Skepsis 
änderte  sich  selbst  nach  der  Lektüre 
der  recht  umfangreichen  Bedie¬ 
nungsanleitung  des  Spiel  nicht  viel, 
denn  bereits  in  der  kurzen  Tastenbe¬ 
legungsreferenz  wird  auf  siebzehn 
verschiedene  Steuerlasten  hingewie¬ 
sen.  Zwar  lassen  sich  vier  dieser  Steu¬ 
ertasten  durch  den  Joystick  ersetzen, 
aber  in  der  Praxis  zeigte  sich  dann, 
daß  es  besser  ist,  von  vornherein  nur 
auf  der  Tastatur  zu  spielen  -  Stick 
und  Tasten  sind  zu  verwirrend.  Nach¬ 
dem  das  Programm  in  den  Rechner 
eingeladen  war  und  ich  die  Lens¬ 
look-Prozedur,  mit  der  das  Spiel  ko¬ 
piergeschützt  ist,  vollzogen  hatte, 
meldete  sich  "TOMAHAWK"  zuerst 
einmal  mit  einem  Menue,  in  dem  sich 
gewisse  Grundkomponenten  seines 
Flugszenarios  einstellen  kann.  Vier 
verschiedene  Schwierigkeitsgrade  las¬ 
sen  sich  durch  das  Einstellen  von  Sei¬ 
tenwind-Turbulenzen  und  bewölkter 
Wetterlage  variieren.  Logischerweise 
erfolgten  meine  ersten  Testflüge  bei 
klarem  Himmel,  minimalem  Seiten¬ 
wind  und  auf  der  Spielstufe  "Lernen¬ 
der”.  Zuerst  einmal  muß  der  Pilot,  um 
seinen  Hubschrauber  zu  starten,  den 
Vergaser  öffnen  und  die  Neigung  der 
Rotorblätter  verändern,  dadurch  er¬ 
hält  der  Hubschrauber  den  zum  Start 
notwendigen  Auftrieb.  Ist  es  dem 
Spieler  dann  derart  gelungen,  seinen 
Hubschrauber  in  die  Luft  zu  bekom¬ 
men,  und  bei  Gas  und  Rotorneigung 
einen  halbwegs  akzeptablen  Wert  an¬ 
zulegen,  ist  es  ab  hier  nur  noch  selten 
notwendig,  an  diesen  beiden  Instru¬ 
menten  etwas  zu  verändern.  Mit  den 
Cursortasten  läßt  sich  der  Hub¬ 
schrauber  beschleunigen,  verlangsa¬ 
men  und  lenken.  Da  es  in  der  Natur 
des  "TOMAHAWK”  liegt,  ein 
Kampfhubschrauber  zu  sein,  sind 
auch  in  dieses  Spiel  Luft-Luft  und 
Luft-Boden  Kampfhandlungen  inte¬ 
griertworden.  Dem  Spieler  stehen  zu 
diesem  Zweck  drei  verschiedene 
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Mit  blitzschnellem 
Bildschirmaufbau. 

In  futuristischem 
High-Tech- 
Design.  /L^ 


SPINDIZZY  ist  eine  künstliche  Weh  ein  riesiges  Puzzle 
aus  steilen  Abhängen,  engen  Korridoren,  hohen  Wänden, 
schmalen  Kanten  und  plötzlich  auftauchenden  Schluchten, 
durch  die  man  seinen  Weg  finden  muß.  Mit  System  und 
ohne  herunterzupurzeln. 


Die  Abteilung  für  Geheimprojekte  hat  eine  kuRjjßthe  W 
entdeckt,  die  irgendwo  im  Raum  schwebt  Undmre  Au < 

£'  ?  ist  es  nun.  eine  exakte  Landkarte  anzufertigen, 
rdings  verfügen  Sie  nur  über  ein  sehr  altes  Raum- 
ff.  das  ungeheuer  viel  Energie  verbraucht  so  daß 
Sie  darauf  angewiesen  sind,  sich  auf  dem  künstlichen 
Planeten  selbst  zu  versorgen. 

Ein  harter  Job  unter  Zeitdruck,  bei  dem  man  häufig  auf 
schier  unüberwindliche  Hindernisse  trifft. 


Und :  Die  Lösung  liegt  im  386.  Screen ! 

Ein  besonderer  Leckerbissen:  Die 

MULTI-PERSPECTIVE 

Funktion,  mit  der  man  die  Hindernisse 

aus  verschiedenen  Blickwinkeln  betrachten  kann. 


Erhältlich  als  Cassette  +  Diskette 
für  Schneider  CPC  und  Commodore  64. 
als  Cassette  für  Sinclair  Spectrum. 

Activision  Deutschland  GmbH. 
Postfach  760680.  2000  Hamburg  76 

VERTRIEB  DEUTSCHLAND: 
Ariolasoft  (Exclusiv  Distributor) 
Rushware  (Autorisierter  Mitvertrieb) 
VERTRIEB  ÖSTERREICH: 
Karasoft  (Exclusiv-Distributor) 
VERTRIEB  SCHWEIZ 
>  HILCU  (Exclusiv-Distributor) 
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TOMAHAWK 
Mit  bißchen  Übung 
kann  der  geneigte 
Spieler  mit  diesem 
rundherum  gelunge¬ 
nen  Flugsimulator 
schon  nach  kurzer 
Eingewöhnungszeit 
tolle  Ausflüge  unter¬ 
nehmen.  Daji  die 
Fliegerrei  auch  nach 
dem  Beherrschen  der 
Instrumente  nicht 
langweilig  wird,  da¬ 
für  sorgen  verschie¬ 
dene  Optionen,  durch 
die  unter  anderen  die 
Wetterverhältnisse 
verschärft  werden 
können. 


CPC  464  IS  CPC  664  IS  CPC  6128  KT 


Waffensysteme  zur  Verfügung,  aller¬ 
dings  ist  in  diesem  Zusammenhang 
anzumerken,  daß  man  diese  nicht 
ohne  weiteres  zum  Einsatz  bringen 
kann.  Zuerst  einmal  müssen  die 
Rotorblätter  in  eine  eigens  dafür  vor¬ 
gesehene  Position  gebracht  werden. 
Erstaunlicherweise  gelang  es  mir  be¬ 
reits  beim  zweiten  Versuch,  einen 
recht  passablen  Flug  auf  die  Beine  zu 
stellen.  Ein  Grund  dafür  ist  sicherlich 
das  erstklassige  Hintergrundszena¬ 
rio,  durch  das  man  dann  mit  dem 
Hubschrauber  fliegt.  Mit  wirklich  toll 
gemachten  Vektorgrafiken  darge¬ 
stellt  präsentieren  sich  Berge,  Flug¬ 
zeughallen.  Wälder,  Hochspannungs¬ 
leitungen  und  noch  einer  ganzen 
Menge  mehr,  in  der  Landschaft  die 
man  überfliegt. 

Mit  "TOMAHAWK"’  liegt  ein  Flugsi¬ 
mulator  vor,  dessen  hervorstechend¬ 
ste  Merkmale  die  verblüffend  einfa¬ 
che  Handhabung,  die  ausgezeichnete 
Spielbarkeit  und  die  gelungene 
Grafik  sind.  Aber  auch  hier  gilt:  was 
sich  leicht  erlernen  läßt,  bedarf  trotz 
allem  einiger  Übung  bis  zur  Meister¬ 
schaft.  Denn,  nur  die  Tapfersten 
riskieren  einen  Flug  mit  der 
"TOMAHAWK”.  (HS) 

SPIELIDEE  BEtMfcNUNGS-  DOKUMENTATION  GWFiK  $0uNt)  PREIS, 'LEISTUNG 
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PACIFIC 


Hersteller:  ERE  Informatique/ 
Gepo  Soft 
Vertrieb:  Fachhandel 
Steuerung:  Joystick/Tastatur 
Monitor:  Farbe/Grün 
Programm:  1()0%M-Code 
Preis:  ca.  40,-  DM 


Laut  Homer,  dem  alten  Griechen¬ 
dichter,  lag  die  sagenumwobene 
Stadt  Atlantis  westlich  der  Säulen  der 
Herkules.  Heute  sind  diese  Säulen 
eher  unter  dem  Namen  "Straße  von 
Gibraltar"  bekannt.  Also  müßten  die 
Ruinen  der  versunkenen  Metropole 
irgendwo  in  den  Tiefen  des  Atlantiks 
zu  finden  sein.  Aber  wie  das  nun  ein¬ 
mal  mit  Sagen  und  Legenden  so  ist, 
legt  sich  keiner  den  Zwang  an,  sie  für 
bare  Münze  zu  nehmen.  So  verlegte 
der  Autor  von  "Pacific"  die  legen- 
denumrankte  Stadt  in  den  Stillen 
Ozean,  eben  in  den  Pazifik.  Ziel  des 
Spieles,  das  mit  seiner  guten  Multi- 
color-Grafik  locker  der  Nachfolger 
von  Sorcery  werden  könnte,  ist  es,  die 
Ruinen  von  Atlantis  zu  finden.  Aus¬ 
gestattet  wie  ein  Helmtaucher  aus  den 
Zwanziger  Jahren  mutet  unser  klei¬ 
ner  Unterwasserheld  eher  wie  ein 
Astronaut  an.  Allerdings  wimmelt  es 
in  den  Pazifischen  Gewässern  regel¬ 
recht  von  gefährlichen  Fischen.  Eine 
einzige  Berührung  reicht  aus,  um 
eines  seiner  drei  Leben  zu  verlieren. 
Ihren  Anfang  nimmt  die  abenteuerli¬ 


che  Tauchexpedition  dicht  unter  der 
Wasseroberfläche,  in  einer  kleinen 
Ausstiegsluke.  Von  dort  aus  geht  es 
durch  die  oberen  Zonen  des  Meeres. 
Immer  tiefer  sinkt  unser  Taucher  in 
die  geheimnisumwitterten  Regionen 
des  Ozeans.  Schon  bald  beginnt  das 
einfallende  Sonnenlicht  zu  verblas¬ 
sen,  im  dunklen  Wasser  erscheinen 
die  ersten  Korallenriffe,  die  anfangs 
noch  recht  aufgelockert  Vorkommen, 
aber  mit  zunehmender  Tiefe  immer 
dichter  und  undurchlässiger  werden. 
Schon  bald  findet  man  versprengte 
Zeugnisse  der  uralten  Kultur,  die  hier 
ihr  Ende  fand.  Im  trüben  Wasser  tau¬ 
chen  Säulen  und  Obelisken  auf,  die 
zweifelsohne  von  Menschen  erbaut 
wurden.  Offensichtlich  muß  es  schon 
früher  einige  Expeditionen  in  diesen 
Gewässern  gegeben  haben,  denn 
immer  wieder  findet  man  im  Gewirr 
der  Riffe  versteckte  Luftpumpen. 
Dies  ist  für  unseren  Taucher  nur  von 
Vorteil,  kann  er  doch  an  diesen 
Lufttankstellen  seinen  Luftvorrat  er¬ 
gänzen.  Aber  nicht  nur  friedliche 
Wissenschaftler  haben  das  Unter¬ 
wasserareal  erkundet,  immer  wieder 
trifft  man  auf  Riffzonen,  die  vermient 
sind.  Berührt  man  eine  dieser 
Sprengkapseln,  ist  es  aus,  und  ein 
weiteres  Leben  ist  dahin.  Außer  dem 
Geheimnis  Atlantis,  das  hier  unter 
den  Wellen  des  Pazifiks  verborgen 
liegt,  scheint  es  ein  weiteres  My¬ 
sterium  zu  geben,  denn  -  ebenfalls  im 
Riff  versteckt  -  unser  mutiger  Tau¬ 
cher  stolpert  über  eine  ganze  Reihe 
von  Türen,  die  so  aussehen,  als  haben 
sie  einmal  zu  einem  Schiff  gehört. 
Durch  diese  Türen  gelangt  man  dann 
in  das  Innere  eines  Wracks,  dessen 
äußere  Abmessungen  von  den  alles 
überwuchernden  Korallen  verborgen 
werden.  Findet  man  die  richtige  Türe, 
so  kann  man  dort  einige  interessante 
Entdeckungen  machen,  aber  es  gibt 
viele  Eingänge.  Bei  den  meisten  hat 


In  dieser  phantasie¬ 
voll  und  farbenfroh 
gestalteten  Unterwas 
serwelt  ist  das  neue¬ 
ste  Spiel  von  Ere  In¬ 
formatique.  Als  Tief¬ 
seetaucher  hat  der 
Spieler  hier  die  Auf¬ 
gabe,  die  Geheim¬ 
nisse  des  Pazifischen 
Ozeans  zu  ergrün¬ 
den.  Die  gelungene 
Grafik  zeichnet 
PA  CJFIC  als  einen 
potentiellen  Nachfolger 
des  Nr.l  Spiels 
”Sorcer\’”  aus. 
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man  keinen  Erfolg,  sie  entpuppen 
sich  als  Sackgassen. 

Inzwischen  müßte  sich  die  Kunde  der 
erstklassigen  französischen  Software 
herumgesprochen  haben.  Auch  "Pa¬ 
cific”  ist  ein  Produkt  der  Firma  ERE 
Informatique,  die  uns  schon  mit 
CRAFTON  &  XUNC  und  EDEN 
BLUES  in  Erstaunen  versetzt  haben. 
So  ist  auch  das  vorliegende  Pro¬ 
gramm  ein  echtes  Kleinod.  Die  gelun¬ 
gene  Farbgrafik  läßt  beim  Vordrin¬ 
gen  in  immer  tiefer  gelegene  Regio¬ 
nen  ein  echtes  ”20.000  Meilen  unter 
dem  Meer”-Feeling  aufkommen.  Das 
Spielfeld,  in  dem  die  ganze  Ge¬ 
schichte  stattfindet,  ist  von  enormen 
Ausmaßen.  Obwohl  ich  "Pacific” 
eigentlich  recht  häufig  spiele,  glaube 
ich,  daß  dort  noch  eine  ganze  Reihe 
von  Dingen  sind,  die  ich  bisher  noch 
nicht  erkundet  habe.  Bei  der  Orientie¬ 
rung  in  dem  gewaltigen  Unterwasser¬ 
labyrinth  helfen  die  ab  und  zu  her¬ 
umliegenden  Sextanten.  Berührt 
man  einen  solchen  und  drückt  dann 
den  Feuerknopf,  blendet  das  Pro¬ 
gramm  eine  Karte  ein,  auf  der  der 
eigene  Standort  verzeichnet  ist.  Auch 
gibt  es  Barrieren,  die  ein  weiteres  Vor¬ 
dringen  unmöglich  machen.  Um  hier 
weiterzukommen,  muß  man  sich 
zuerst  einmal  den  Weg  freisprengen. 


Dies  kann  mit  Pulverfässern  gesche¬ 
hen,  die  gelegentlich  herumliegen. 
"Pacific”  ist  ein  rundherum  emp¬ 
fehlenswertes  Spiel,  an  dem  man 
lange  seine  Freude  haben  kann.  Das 
enorme  Spielareal,  die  tolle  Grafik 
und  die  Geheimnisse,  die  es  zu  lösen 
gilt,  werden  jeden  Spieler  immer  wie¬ 
der  auf  "Pacific”  zurückkommen 
lassen.  (HS) 
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The  Battle  beyond 
the  Stars 

Hersteller:  Solar  Software 
Vertrieb:  Fachhandel 
Steuerung:  Taslatur/Joystick 
Monitor:  Farbe 
Programm:  100%  M-Code 
Preis:  ca.  34,-  DM 

CPC  464  E  CPC  664  B  CPC  6128  H 
Ein  wenig  steinzeitlich  wirkt  es 
schon,  was  sich  da  auf  dem 
Bildschirm  abspielt.  Wie  Kamika¬ 
zeflieger  stürzen  sich  ganze  Kaska¬ 


den  von  grauslichen,  eroberungs¬ 
süchtigen  Aliens  auf  die  letzte  schüt¬ 
zende  Bastion,  die  die  Erde  verteidigt. 
Und  derjenige,  dessen  Aufgabe  hier 
die  Steuerung  der  Verteidigungsan¬ 
lage  ist,  sind  natürlich  Sie,  der  Spieler. 
Zweifelsohne  ist  "Battle  beyond  the 
Stars”  altbekannten  Arcadenhits  wie 
"Galaxions”  oder  "Galaga"  nach¬ 
empfunden.  Als  Homecomputer¬ 
version  für  den  Schneider  liegt 
hiermit  als  so  etwas  wie  ein  Novum 
vor.  Wenn  man  sich  gerne  mit  derarti¬ 
gen  ”Zap  em  up”-Spielen  beschäftigt, 
dann  findet  der  geneigte  Spieler  hier 
mehr  als  genug  Action. 

Eine  "Dicker  Daumen”-Garantie 
(durch  permanentes  Feuerknopf  be¬ 
tätigen)  kann  im  vorliegenden  Fall 
mit  ruhigem  Gewissen  ausgespro¬ 
chen  werden.  Bei  der  Erstellung  des 
Programms  haben  die  Autoren  sich 
sicherlich  viel  Mühe  gegeben.  Es  ist 
sozusagen  ein  gelungenes  Spiel  ge¬ 
worden.  Daß  die  Spielidee  dabei 
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doch  ein  wenig  zu  kurz  gekommen 
ist,  liegt  wohl  eher  an  der  Vorlage,  die 
man  sich  gesucht  hat,  denn  am 
Programm  kann  nichts  bemängelt 
werden.  Nichtsdemzulrotze  ist  '  Batt- 
le  beyond  the  Stars"  ein  nettes  und 
gut  spielbares  Programm  geworden. 

(HS) 

Thing  on  a  Spring 

Hersteller:  Gremlin  Graphics 
Vertrieb:  Fachhandel 
Steuerung:  Joystick/Tastatur 
Monitor:  Farbe/Grün 
Programm:  M-Code 
Preis:  ca.  30,-  DM 

CPC  464  B  CPC  664  Kl  CPC  6128  K 
Magie  und  Technologie  stellen  den 
Hintergrund  dar,  in  dem  sich  der 
Held  dieses  lustigen  Vertreters  der  Ar- 
cade-Spiele  wiedertindet.  Hat  doch 
ein  übler  Kobold  all  seine  Magie 
darauf  verwendet,  sich  ein  Mittel  zur 
Eroberung  der  Welt  zu  erschaffen. 
Und  man  glaubt  es  kaum,  aber 
scheinbar  eignet  sich  für  dieses 
Unterfangen  eine  moderne  Techno¬ 
logie  um  einiges  besser  als  alther¬ 
gebrachte  Magie  mit  ihren  doch 
schon  leicht  eingestaubten  Zauber¬ 
sprüchen.  So  sieht  sich  Kumpan 
Kobold  auch  gezwungen,  der  baldi¬ 
gen  Verwirklichung  seines  Planes  we¬ 
gen,  all  sein  Hab  und  Gut  (und  noch 
das  seiner  leicht  murrenden  Spießge¬ 
sellen)  in  bare  Münze  zu  verwandeln. 
Aber  nicht  mittels  eines  genialen 
Zauberspruchs,  sondern  durch  die 
Nutzung  einer  viel  mächtigeren  und 
böseren  Gewalt  -  der  schrecklichen, 
gnadenlosen  und  verheerenden  freien 
Marktwirtschaft. 

Als  er  schließlich  das  benötigte  Geld 
beisammen  hat,  besorgt  er  sich  eine 
Fabrik;  genauer  gesagt  eine  Waffen¬ 
schmiede.  Diese  versetzt  er,  nun  aber 
unter  Zuhilfenahme  seiner  magi¬ 
schen  Fähigkeiten,  tief  in  den  Bauch 


"Battle  beyond  the 
Stars"  fällt  auf  den 
ersten  Blick  durch 
die  etwas  zu  kurz 
gekommene  Spiel¬ 
idee  auf.  Denn 
grundsätzlich  geht 
es  nur  darum, 

Aliens,  die  sich  in 
immer  neuen  Wellen 
kamikazeartig  auf 
das  Raumschiff  des 
Spielers  stürzen,  zu 
zerstören.  Wer  sich 
damit  zufrieden  gibt, 
kommt  zweifelsohne 
auf  seine  Kosten. 


der  Erde,  in  eine  unbekannte,  ge¬ 
waltige  Höhle.  Aber  schon  bald 
taucht  der  Held  dieser  Geschichte 
auf;  eine  seltsame  Mischung  aus  grü¬ 
nem  Männlein  vom  Mars  und  einer 
ausgeleierten  Bettfeder  (zumindest 
hört  es  sich  so  an).  Kaum  überblickt  er 
die  gesamte  Situation,  entschließt  er 
sich  aus  reiner  Nächstenliebe,  ohne 
auch  nur  einen  Gedanken  an  die 
etwaige,  sicherlich  nicht  bescheide¬ 
ne  Belohnung  zu  verschwenden,  dem 
bösen  Kobold  Mores  zu  lehren  und 
seine  Fabrik  stillzulegen. 

In  gewisser  Weise  ist  man  ein  wenig 
an  das  alte  Manic-Miner-Spielkon- 
zept  erinnert,  wenn  man  sich  "Thing 
on  a  Spring"  zum  ersten  Mal  anschaut. 
Sicherlich  kommt  das  nicht  von 
ungefähr,  denn  auch  hier  muß  man 
auf  Plattformen  rumlaufen,  umher¬ 
hüpfen  und  Gegenstände  einsam¬ 
meln.  Aber  damit  hat  es  sich  dann 
auch  schon  mit  den  Gemeinsamkei¬ 
ten.  Die  Fabrik  des  Kobolds  teilt  sich 
in  vier  Stockwerke  auf,  in  denen  man 
mittels  eines  Aufzuges  "umher-sprung- 
fedem”  kann.  Jede  Etage  hat  vier  große 
Räume,  die  durch  Korridore  mitein¬ 
anderverbunden  sind.  Diese  Räume 


scrollen  horizontal  über  den  Monitor. 
Zwar  hat  unsere  mutige  Sprungfeder 
gegenüber  Normalsterblichen  den 
Riesen  vorteil  einer  großen  Sprung¬ 
kraft,  aber  um  sich  diese  zu  erhalten, 
benötigt  sie  immer  wieder  Öl.  Aber 
glücklicherweise  sind  außer  den  ei¬ 
gentlich  einzusammelnden  Puzzletei¬ 
len  noch  eine  ganze  Reihe  Ölfässer  in 
der  ganzen  Fabrik  verteilt.  Mit  deren 
Hilfe  ist  es  überhaupt  erst  möglich,  die 
gestellte  Aufgabe  zu  erfüllen  und,  nach¬ 
dem  alle  Puzzleteile  geholt  wurden, 
dem  bösen  Kobold  eins  auszuwi¬ 
schen.  Auf  dem  erwähnten  Puzzle  ist 
nämlich  ein  Tip  verborgen.  Ein  Tip, 
der  dem  Spieler  zeigt,  was  er  tun  muß, 
um  die  gestellte  Aufgabe  zu  erfüllen. 
Alles  in  allem  hat  THING  alles,  was 
man  von  einem  gutem  Spiel  erwartet. 
Ganz  besonders  angetan  hat  es  mir 
der  Sound.  Mit  derartig  guten  Musik¬ 
untermalungen  wird  man  auf  dem 
CPC  ja  wirklich  nicht  verwöhnt,  und 
was  da  bei  THING  aus  dem  Laut¬ 
sprecher  tönt,  ist  wirklich  nicht  von 
schlechten  Eltern.  Aber  nicht  nur 
durch  den  Sound  hebt  sich  THING  aus 
der  grauen  Softwaremasse  hervor.  Es 
ist  am  Anfang  nicht  so  schwierig,  so 
daß  auch  diejenigen,  die  keine  Joy¬ 
stickakrobaten  sind,  akzeptable  Er¬ 
gebnisse  erzielen  können.  Nach  eini¬ 
gen  Räumen  wird  es  dann  allerdings 
schwieriger.  Laserstrahlen,  verschwin¬ 
dende  Plattformen  und  Schalter,  die 
einen  bei  Berührung  an  die  unmög¬ 
lichsten  Plätze  versetzen,  tragen  dazu 
bei,  daß  dieses  Spiel  auch  nach  eini¬ 
ger  Zeit  noch  nicht  langweilig  wird. 

(HS) 
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Tief  unter  der  Erde 
liegt  die  Fabrik,  mit 
der  der  böse  Kobold 
und  seine  Spießgesellen 
die  Herrschaft  über  die 
Erde  erringen  wollen. 
Der  einzige,  der  zur 
Stelle  ist,  um  dies  zu 
verhindern,  ist  das 
Sprungfederding, 
ln  vier  verschiedenen 
Stockwerken  gilt  es, 
Puzzle  teile  und  Ge¬ 
schenkpackungen  ein¬ 
zusammeln.  Ohne  diese 
Dinge  ist  es  nicht  mög¬ 
lich,  die  Macht  des 
Kobolds  zu  brechen 
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Da  sollte 
dann  auch 
gute  CPC-Soflware 
unter  DM  100,-  kosten! 


PROFIMAT 

Bei  der  Programmierung  von  zeitkritischen 
Routinen  kommt  man  häufig  nicht  um  die 
Maschinensprache  herum.  Damit  die  Kodierung 
nicht  unnötig  erschwert  wird,  gibt  es  PROFIMAT 
CPC,  einen  Assembler,  der  das  Arbeiten  durch 
den  integrierten  Editor  mit  seiner  einfachen  Hand¬ 
habung  zum  Vergnügen  macht.  Dabei  sind 
schnellste  Assemblierung,  Verkettung  der  Quell- 
fexte  und  Monitorfunktionen  nur  einige  der  her¬ 
vorragenden  Punkte  des  Programmes. 

Mit  deutschem  Handbuch  erhältlich  für  nur 


DM 


99,- 


DATAMAT 


Die  CPC-Version  von  Deutschlands  meist- 
gekauffer  Dateiverwaltung,  jetzt  wesentlich 
schneller  und  noch  komfortabler  durch  Verbesse¬ 
rung  einiger  Programmpunkte  (z.B.  Suchen- 
Funktion  jetzt  vor/rückwärts),  flexibel  durch  völlig 
frei  gestaltbare  Eingabemaske  und  universell  bei 
der  Ausgabe,  viele  Drucker  sind  ansfeuerbar.  Mit 
der  Schnittstelle  zu  TEXTOMAT  CPC  erhält  der 
Anwender  eine  Dateiverwaltung,  die  in  dieser 
Preisklasse  alles  bietet. 

Mit  deutschem  Handbuch  und  Übungslektion  nur 


DM 


99,- 


PROFI 

PAIIMTER 


Das  sensationelle  Programm  zum  Malen,  Ent¬ 
werfen  und  Zeichnen  auf  CPC-Compufern.  Aus¬ 
gefeilte  Maschinenprogrammierung  macht  PROFI 
PAINTER  so  schnell  und  komfortabel,  daß  das 
Programm  den  berühmten  Vorbildern  der  32-Bit- 
Weit  kaum  nachsfeht  und  diese  in  manchen 
Punkten  sogar  übertrifft.  Die  einfache  Bedienung 
mit  Pull-Down-Menüs  macht  das  Programm  sehr 
übersichtlich  und  leichtverständlich.  Sensationell 


auch  der  Preis: 


DM 


99,- 


BUDGET 

MANAGER 


Die  universelle  Buchführung  sowohl  für  private 
Zwecke  als  auch  zur  Planung,  Überwachung  und 
Abwicklung  von  Budgets  jeder  Art.  Eine  Übersicht 
über  die  430  Budgetsätze  und  335  Konfensätze 
läßt  sich  in  Form  von  Tabellen  und  Grafiken  auf 
dem  Bildschirm  und  auch  auf  dem  Drucker 
erreichen.  Volle  Menüsteuerung  erleichtert  die 
Arbeit  mit  dem  Programm. 

Mit  deutschem  Handbuch  für  nur 


DM 


DATA  BECKER 

Merowingerstr.  30  •  4000  Düsseldorf  Tel.  (0211)  31 0010 


MATHEMAT 


MATHEMAT  beschäftigt  sich  mit  der  Geometrie 
und  Algebra  sowie  mit  der  Kurvendiskussion  und 
ist  damit  ein  hervorragendes  Hilfsmittel  für 
Schule,  Beruf  und  Studium.  Mit  MATHEMAT  kön¬ 
nen  Sie  beliebige  Funktionen  ableifen,  integrieren 
und  zeichnen  lassen.  Weitere  Programmteile  sind 
der  Taschenrechner  und  der  Geometrie/Algebra- 
Teil,  in  dem  Sie  Flächen-  und  Körperberechnun¬ 
gen  durchführen  können.  Die  gängigsten  Drucker 
können  im  Programm  angepaßt  werden. 
MATHEMAT  CPC  mit  Handbuch  für  nur 


DM 


99,- 


TEXTOMAT 


Ein  modernes,  leicht  zu  bedienendes  Texfverar- 
beitungsprogramm,  das  so  manchen  überlade¬ 
nen  und  komplizierten  „Textdinosaurier"  hinsicht¬ 
lich  Bedienungskomfort  um  Längen  schlägt.  Da 
merkt  man  die  Erfahrung  von  über  50.000  ver¬ 
kauften  TEXTOMAT-Programmen  auf  den  unter¬ 
schiedlichsten  Mikrocomputern.  Durch  Ver¬ 
knüpfen  von  Texfbausfeinen  können  Schriftstücke 
flexibel  und  in  beliebiger  Größe  bearbeitet 
werden. 

Mit  deutschem  Handbuch  und  Übungslektion  nur 
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Fremd¬ 
monitor  e 
am  CPC 


Welche  Monitore  passen?  Was  bedeu¬ 
tet  RGB  oder  composite  video  An¬ 
schluß?  Große  Unsicherheit  wird  beim 
Anwender  sowie  auch  in  der  Bera¬ 
tungsszene  beim  Monitor  oder  Compu¬ 
terkauf  offenbart.  Paßt  der  Monitor 
auch  an  andere  Systeme?  Kann  ein  gün¬ 
stig  angebotener  Farbmonitor  eine  Al¬ 
ternative  zum  Schneider-Farbmonitor 
sein?  Kauf  eines  Modulators  oder  eines 
Farbmonitors?  Eine  falsche  Entschei¬ 
dung  führt  hier  oft  zu  Enttäuschungen 
und  Geldverlust. 

Das  falsche  Datensichtgerät  kann  auch 
einen  negativen  Einfluß  auf  das  Wohl¬ 
befinden  einer  am  Computer  tätigen 
Person  haben,  was  sich  dann  durch 
frühzeitige  Ermüdungserscheinungen, 
Kopfschmerzen  und  anderes  unange¬ 
nehm  bemerkbar  macht. 

Das  Ziel  dieses  Artikels  soll  es  sein, 
Hinweise  zu  geben,  wann  ein  Moni¬ 
toreinsatz  sinnvoll  ist,  und  über  die 
Vermittlung  einiger  Grundlagen,  die 
auftretenden  Fragen  im  Zusammen¬ 
hang  mit  dem  Anschluß  eines  Fremd¬ 
monitors  am  CPC  zu  beantworten. 
Ein  Schwerpunkt  liegt  also  bei  der 
Schnittstelle  Computer  -  Monitor. 
Die  Darstellung  einiger  Grundlagen 


aus  der  Bildübertragungstechnik 
wird  viele  Fragestellungen  von  selbst 
beantworten,  und  ist  nützlich  bei  Pro¬ 
blemlösungen  im  gesamten  Bereich 
der  Bilddarstellung  über  Monitore. 

Die  Gliederung  dieses  Artikels: 

1.  Was  ist  ein  Monitor  und  wozu  dient 
er? 

2.  Wann  ist  die  Anschaffung  eines 
Monitors  sinnvoll  (Modulator  plus 
TV  oder  Monitor)? 

3.  Wie  arbeitet  ein  Monitor  (s/w  und 
Farbe)? 

4.  Welche  Schnittstellen  gibt  es? 

5.  Die  Schnittstelle  des  CPC 

6.  Fazit  und  Tips 


Was  ist  ein  Monitor? 


Ein  Monitor  ist  ein  Gerät,  um  dem 
Menschen  Informationen,  die  in 
elektrischen  Signalen  enthalten  sind, 
schnell  erfaßbar  darzustellen.  Er 
wandelt  also  elektrische  Signale  in 
optische  um.  Prinzipiell  ist  es  dem 
Monitor  egal,  von  wem  er  die  Signale 
zur  Darstellung  erhält.  Man  kann  ihn 
als  ein  universell  einsetzbares  Peri¬ 
pheriegerät  bezeichnen,  siehe  hierzu 
Bild  1. 

Ob  am: 

-  Computer  als  Ausgabegerät  für  Daten 

-  Videorecorder  zum  Betrachten  von 
Filmen 

-  TV/Tuner  zum  Konsumieren  eines 
Fernsehprogramms 

-Videokamerasystem  zur  Überwa¬ 
chung  von  Räumen, 

Mit  einem  einzigen  Monitor  könnte 
man  vom  Prinzip  her  alle  diese  Auf¬ 
gaben  meistern.  Voraussetzung  ist, 
daß  der  Monitor  seine  zur  Darstel¬ 
lung  benötigten  elektrischen  Infor¬ 
mationen  immer  in  der  gleichen  Art 
angeboten  bekommt.  Hier  liegt  ein 
Problem  (siehe  später:  Schnittstel¬ 
lenproblem). 


Wann  ist  die  Anschaffung 
eines  Monitors  sinnvoll? 


Dieses  Thema  soll  im  Hinblick  auf 
Nutzung  eines  Monitors  im  Bereich 
der  Schneider  CPC  Computer¬ 
technik  erörtert  werden.  Eine  Aus¬ 
dehnung  auf  andere  Systeme  würde 
den  Rahmen  dieses  Artikels  spren¬ 
gen.  Das  Prinzip  der  gemachten  Aus¬ 
sagen  läßt  sich  jedoch  ohne  weiteres 
in  andere  Bereiche  übertragen. 

Dank  des  lobenswerten  Konzepts  der 
Firma  Schneider,  Komplettsysteme 
kostengünstig,  sofort  einsetzbar  und 


als  Grundsystem  schon  mit  einem 
Monitor  (grün  oder  Farbe)  ausgerü¬ 
stet,  zu  vertreiben,  befindet  sich  ein 
CPC-Besitzer  in  den  meisten  Anwen¬ 
dungssituationen  in  einer  deutlich 
besseren  Lage  als  dies  der  größte  Teil 
von  Computereigentümern  anderer 
Hersteller  ist.  Es  ergeben  sich  zwei 
Ausgangssituationen: 

A)  Man  ist  Eigner  eines  CPC  mit 
Farbmonitor.  Ein  zusätzlicher  mono¬ 
chromer  Monitor  hat  eigentlich  nur 
für  denjenigen  Nutzen,  der  sich 
häufig  für  viele  Stunden  mit  Anwen¬ 
dungsprogrammen  wie  Dateiverwal¬ 
tungen,  Textverarbeitungen.  Tabel¬ 
lenkalkulationen  und  anderen  Ar¬ 
beitsprogrammen  (meistens  im  80 
Zeichen-Modus)  beschäftigt.  Obwohl 
der  Schneider  Farb-Monitor  eine 
ausgezeichnete  Darstellungsqualität 
liefert,  die  auch  in  obengenannten 
Anwendungsbereichen  einen  Teil  der 
Benutzer  zufriedenstellen  wird,  er¬ 
reicht  man  mit  einem  monochromen 
Monitor  eine  noch  ruhigere  und  kla¬ 
rere  Darstellung  von  Zeichen.  Ein 
direkter  Sichtvergleich  beim  Compu¬ 
terhändler  muß  letztendlich  das  aus¬ 
schlaggebende  Argument  liefern,  ob 
sich  für  Sie  diese  Investition  lohnt. 
Achten  Sie  beim  Vergleich  auf  die 
Detaildarstellung  von  Buchstaben 
im  80  Zeichen-Modus.  Weitere  Aus¬ 
wahlkriterien  siehe  Punkt.6. 

B)  Man  ist  Eigentümer  eines  CPC 
mit  grünem  Monitor.  Dies  wird 
sicherlich  auf  den  größeren  Teil  der 
CPC-Eigentümer  zutreffen.  Die 
Frage  einer  nachträglichen  Anschaf¬ 
fung  eines  Farbmonitors  wird  hier 
am  häufigsten  gestellt.  Die  zusätzli¬ 
che  Darstellung  von  Farben  ist  in  eini¬ 
gen  Bereichen  auch  wirklich  ein 
deutlicher  Gewinn. 

Farbmonitore  sind  relativ  teuer.  Die 
angebotenen  Modulatoren,  die  einen 
Anschluß  des  Computers  an  ein  nor¬ 
males  Farbfernsehgerät  ermögli¬ 
chen,  können  für  einige  Bereiche  eine 
deutlich  preiswertere  Alternative 
sein.  Ein  Farbfernseher  steht  heute  in 
vielen  Wohnzimmern.  Diesen  Weg 
zu  einer  Farbdarstellung  würde  ich 
allerdings  nur  denjenigen  uneinge¬ 
schränkt  empfehlen,  die  diesen  nur  in 
größeren  Zeitabständen  nutzen  wol¬ 
len,  um  mit  ein  paar  Freunden  zu 
spielen.  Der  Spiele-Freak  aber  fährt 
sicherlich  besser  mit  einem  Farbmo¬ 
nitor.  Bei  denjenigen,  die  sich  in  allen 
nur  denkbaren  Bereichen  mit  dem 
Computer  auseinandersetzen,  über¬ 
wiegt  häufig  das  Arbeiten  mit  farbiger 
Grafik.  Bei  häufigem  Grafikeinsatz 
sollte  die  Anschaffung  eines  Farbmo¬ 
nitors  in  Erwägung  gezogen  werden. 
Hat  ein  Programmierer  es  im  we- 
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Bild  I:  Speisung  eines  Monitors 


Bild  2:  Monitoreingangssignale 


sentlichen  mit  Aufgabenstellungen 
zu  tun.  bei  denen  die  farbige  Darstel¬ 
lung  eine  untergeordnete  Rolle  spielt, 
so  kann  der  Modulator  eingesetzt 
werden,  um  (in  der  Schlußphase  der 
Programmierung)  die  Farben  einzu¬ 
geben.  Bei  CPC-Anwendern,  die  Ar¬ 
beitsprogramme  verwenden,  in  de¬ 
nen  die  farbige  Darstellung  wichtig 
ist.  gibt  es  zum  Farbmonitor  keine 
Alternative. 

Außer  einer  klareren  Darstellung  er¬ 
gibt  sich  beim  Farbmonitor  gegen¬ 
über  dem  Fernseher  der  Vorteil  einer 
dem  Abstand  zum  Benutzergerechte¬ 
ren  Bildschirmgröße.  Eine  größere 
Nachleuchtdauer  der  Monitorbild¬ 
röhre  mildert  Flimmereffekte. 


Wie  arbeitet  ein  Monitor? 


Wir  kennen  zwei  Arten  von  Monito¬ 
ren: 

a)  Monitore.  die  nur  ein  einfarbiges 
Bild  darstellen  (auch  bezeichnet  als 
monochrome,  grüne  oder  schwarz- 
weiß-Monitore)  und 

b)  Monitore,  die  mehrere  Farben  dar¬ 
stellen  können. 

Man  könnte  Monitore  auch  nach  an¬ 
deren  Kriterien  gruppieren,  aber  die 
obere  Aufteilung  ist  die  meistver- 
wandte.  auch  in  der  Computer- 
Branche. 

Anmerkung:  Dieser  Artikel  behan¬ 
delt  Monitore.  wie  sie  in  der  Fernseh-, 
Video-  und  Computertechnik  ver¬ 
wendet  werden  (auch  als  Video- 
Monitore  bezeichnet).  Die  zum 
Monitor  angelieferten  elektrischen 
Signale  sind  nach  dem  hier  gültigen 
TV-Standard  konzipiert,  und  der 
Monitor  arbeitet  ebenfalls  nach  den 
Spezifikationen  dieser  Norm  (z.B. 
zeilenweise  Darstellung  in  625  Zei¬ 
len,  25  Bilder  pro  Sekunde).  Moni¬ 
tore.  die  nach  anderen  Normen  arbei¬ 
ten,  können  nicht  am  CPC  betrieben 
werden!  Es  gibt  Monitore,  die  nach 
anderen  Prinzipien  laufen  (z.B.  x.y.z- 
Monitore).  Diese  werden  hier  nicht 
behandelt  -  haben  sie  doch  keinerlei 
Bedeutung  in  der  Computertechnik. 
Ein  Monitor  braucht  außer  zugeführ¬ 
ter  Energie  (Stromanschluß)  ver¬ 


schiedene  Eingangssignale.  Hier 
unterscheidet  man  zwei  Gruppen. 
Einmal  die  Signale,  die  eigentlich  die 
darzustellende  Information  beinhal¬ 
ten.  d.h.  Helligkeits-  oder  Farbwerte 
als  Funktion  der  Zeit.  Die  zweite 
Gruppe  sind  die  Steuer-(Synchronisa- 
tions)-signale,  die  der  Monitor  zur 
Darstellung  der  gelieferten  Informa¬ 
tionen  im  richtigen  Format  benötigt; 
denn  der  Monitor  muß  wissen,  wel¬ 
ches  die  erste  Information  eines  ge¬ 
sendeten  Bildes  oder  einer  Zeile  ist. 
siehe  hierzu  Bild  2. 

Damit  sind  wir  schon  mitten  drin,  in 
der  Erklärung  des  Funktionsprinzips 
eines  Monitors.  Lassen  wir  zunächst 
die  Farbe  weg. 

a)  Funktion  des  grünen  (monochromen) 
Monitors 

Auf  Bild  2  erkennen  wir,  als  Ein¬ 
gangssignale  werden  die  horizonta¬ 
len  und  vertikalen  Synchronisa¬ 
tion  ssignale,  sowie  das  die  Infor¬ 
mation  enthaltende  Helligkeitssignal 
(Leuchtdichte.  Luminanz)  benötigt. 
Alle  diese  Signale  können  zu  einem 
Signal  (-gemisch)  vereint  sein,  und 
über  einen  Leiter  (plus  Bezugsleiter 
oder  Erde),  meist  in  Form  eines 
Koaxialkabels,  übertragen  werden. 
Das  Signal  heißt  BAS-Signal  (com- 
posite  video  signal)  und  ist  zusam¬ 
mengesetzt  aus: 

-  dem  Bildsignal  B, 

-  dem  Austastsignal  A  und 

-  den  Synchronsignalen  S. 


Sehen  wir  uns  Bild  3,  das  Block¬ 
schaltbild  des  monochromen  Moni¬ 
tors  einmal  an  und  versuchen  daraus 
herzuleiten,  was  mit  unserem  Ein¬ 
gangssignal  passiert  und  wie  seine 
Einzelkomponenten  zum  Bildaufbau 
im  Monitor  beitragen. 

Der  Monitor  stellt  die  Informationen 
zeilenweise  dar.  Ein  Eleklronenstrahl 
wird  durch  magnetische  Ablenkung 
zeilenweise  über  die  Leuchtschicht 
der  Bildröhre  geführt.  Je  nach  ver¬ 
wandter  Leuchtschicht  ergibt  sich 
dadurch  eine  farbige  (z.B.  grüne) 
Leuchtspur.  Die  zwei  Ablenkspulen 
(vertik./horiz.)  erhalten  ihre  Ströme 
(ausschlaggebend  für  den  Aufbau  der 
ablenkenden  Magnetfelder)  durch 
die  jeweiligen  (vertik./horiz.)  Genera¬ 
torstufen,  die  synchronisiert  durch 
die  zugehörigen  Synchronisationsim¬ 
pulse,  die  notwendigen  vertikalen 
und  horizontalen  Ablenkspannun¬ 
gen  erzeugen.  Diese  beiden  Synchro¬ 
nisationsimpulse  werden  von  unse¬ 
rem  eingespeisten  BAS-Signal  ab¬ 
getrennt  und  in  vertikale  und 
horizontale  Pulse  aufgetrennt.  Sie 
sorgen  für  die  Synchronisation,  d.h., 
daß  der  eine  Zeile  schreibende 
Elektronenstrahl  an  jedem  Ort  dieser 
Zeile  die  zugehörige  Bildinformation 
(Helligkeit)  enthält. 

Die  Helligkeitsinformation  steckt  in 
der  Aufprallgeschwindigkeit  der 
Elektronen  auf  die  Leuchtschicht 
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(kinetische  Energie).  Je  größer  die 
Energie,  und  je  mehr  Elektronen  auf¬ 
prallen,  umso  heller  leuchtet  der 
Aufprallpunkt. 

Die  Geschwindigkeit  der  Elektronen 
kann  durch  Spannungen  an  den 
Elektroden  der  Bildröhre  beeinflußt 
werden.  Über  eine  Gitterspannung 
wird  meistens  die  Grundhelligkeit 
eingestellt,  während  die  Bildinfor¬ 
mation  durch  die  Katodenspannung 
ihren  Einfluß  findet.  Die  Katode  er¬ 
hält  das  Bildsignal  vom  Videover¬ 
stärker. 

Außer  der  Bildinformation  enthält 
dieses  Signal  meist  noch  das  Aus¬ 
tastsignal,  welches  während  der 
Strahlrückläufe  (nach  dem  Schrei¬ 
ben  einer  Zeile  eines  Bildes)  dafür 
sorgt,  daß  diese  auf  dem  Bildschirm 
unsichtbar  bleiben  (Austasten). 

Bild  4  zeigt  den  Aufbau  des  BAS- 
Signals 

Wir  können  jetzt  mit  unseren  Vor¬ 
kenntnissen  dieses  Signal  deuten. 
Der  Zeilensynchronimpuls  trennt  die 
Zeilen  (Abstand  64  us  nach  TV- 
Norm).  Er  initiiert  den  Strahlenrück¬ 
lauf  am  Ende  einer  Zeile.  Er  liegt  mit¬ 
ten  im  Austastimpuls,  der  für  das 
Unsichtbarbleiben  des  Rücklaufs 
sorgt  Der  Spannungsverlauf  oberhalb 
des  Austastsignals  stellt  den  Hel¬ 


ligkeitsverlauf  einer  Zeile  dar.  Jeder 
Punkt  auf  dieser  Kurve  stellt  einen 
Helligkeitswert  dar,  der  zu  einer  be¬ 
stimmten  Position  auf  dieser  Zeile 
gehört. 

Das  einzige,  was  am  BAS-Signai  von 
Bild  4  fehlt,  ist  das  vertikale  Synchro¬ 
nisationssignal  (Bildanfang).  Da  es 
nur  alle  625/2  Zeilen  auftritt  (es  wer¬ 
den  zwei  Halbbilder  geschrieben), 
zudem  länger  als  eine  Zeile  ist  und 
aus  mehreren  Teilen  besteht,  habe 
ich  es  in  Bild  4  weggelassen.  Es  ist 
zum  weiteren  Verständnis  nicht  wich¬ 
tig,  dieses  Signal  im  Detail  zu  kennen. 
Der  Monitor  bekommt  durch  dieses 
Signal  die  Information:  "die  nächste 
Zeile,  die  kommt,  ist  die  erste  eines 
Bildes”.  Nun  haben  wir  Eingangssig¬ 
nal  und  Funktionsprinzip  des  grünen 
Monitors  beim  Schneider  CPC  ken¬ 
nengelernt  (Anschlußdetails  siehe 
Schnittstelle). 

Anmerkung:  Einige  Monitore  sind 
noch  mit  einem  Tonteil  ausgestattet. 
Dieses  wäre  im  Bild  3  ein  separater 
Teil  mit  den  Blöcken  Verstärker  und 
Lautsprecher.  Zu  dem  Eingangssig¬ 
nal  BAS  würde  es  ein  zweites  Ein¬ 
gangssignal  AUDIO  geben,  welches 
die  niederfrequente  Toninformation 
liefert.  Beim  CPC  bedeutet  dieses,  es 
ist  ein  extra  Kabel  zwischen  dem 
AUDIO-Ausgang  des  Computers 
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und  dem  AUDIO-Eingangdes  Moni¬ 
tors  zu  ziehen. 


b)  Funktion  des  Farbmonitors 

Beim  Farbmonitor  wird  das  zuvor  Ge¬ 
sagte  lediglich  ergänzt  durch  die  Be¬ 
schreibung  der  zum  monochromen 
Monitor  hinzuzufügenden  Teile,  die 
eine  Darstellung  von  Farben  er¬ 
möglichen.  Die  Eingangssignale  zum 
Monitor  müssen  als  Bildinformation 
jetzt  zusätzlich  zur  Helligkeit  (Lumi- 
nanz-  oder  Leuchtdichtesignal)  die 
Farbinformation  (Farbartsignal  F) 
enthalten.  Das  Farbartsignal  w'ird 
auch  Chrominanz  genannt.  Wir  er¬ 
halten  also  als  Eingangssignal  für  das 
BAS-Signal  beim  monochromen 
Monitor  das  FBAS-Signal  beim 
Farbmonitor. 

Während  wir  beim  monochromen 
Monitor  als  Bildinformation  die  Hel¬ 
ligkeitsverteilung  ansahen,  redet  man 
beim  Farbmonitor  von  der  Farbver¬ 
teilung.  Der  Begriff  "Farbe"  steht 
dann  also  für  folgende  Komponen¬ 
ten: 


Farbe 


Leuchtdichte 

(Helligkeit) 
(Lumina  nz) 
Farbton 
(Wellenlänge) 


Farbart 

(Chrominanz) 

Farbsättigung 

(Intensität) 


Unser  Eingangssignal  zum  Monitor 
muß  also  außer  den  Svnchronisa- 
tionssignalen  und  dem  Auslastsig¬ 
nal  folgende  drei  Bildinformationen 
liefern: 

i)  Leuchtdichte 

Den  Einfluß  dieser  Größe  kann  man 
sich  am  besten  vor  Augen  führen, 
wenn  man  an  die  Projektion  eines 
Farbdias  mit  einer  100W  Birne  oder 
mit  einer  300W  Birne  denkt. 

Die  Leuchtdichte  des  projizierten 
Bildes  mit  300W  ist  höher.  Denselben 
Einfluß  kann  man  beim  Farbmonitor 
sichtbar  machen,  wenn  man  die  Hel¬ 
ligkeit  des  Bildes  am  entsprechenden 
Regler  verändert. 

ii)  Farbton 

Das  farbige  Licht  ist  nichts  anderes 
als  eine  elektromagnetische  Welle 
mit  einer  bestimmten  Wellenlänge  (je 
nach  Farbe).  Der  Farbton  wird  durch 
die  Wellenlänge  des  Lichtes  be¬ 
stimmt.  und  ist  damit  das  wesentlich¬ 
ste  Unterscheidungsmerkmal  der 
Farbe. 

Ui)  Farbsättigung 

Die  Farbsättigung  gibt  den  Weißan¬ 
teil  einer  Farbe  an.  Wird  z.B.  Rot 
durch  den  Zusatz  von  Weiß  entsättigt. 
so  geht  Rot  in  Rosa  über.  Eine  Sätti¬ 
gung  von  0  %  entspricht  Weiß, 
während  eine  100  %-ige  Sättigung  der 
Spektralfarbe  entspricht. 
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Bild  6:  Erzeugung  der  Farbdijferenzsignale 


Vielen  von  uns  ist  aus  der  Physik  be¬ 
kannt.  daß  durch  ein  Prisma  fallen¬ 
des  weißes  Licht  zerlegt  wird  in  seine 
Speklralfarben.  Ebenso  kann  aus  der 
Summe  der  Spektral  färben  wieder 
weißes  Licht  gewonnen  werden. 
Hierzu  reichen  aber  auch  drei  Farben 
wie  Rot,  Grün  und  Blau.  Diese  heißen 
dann  Primärfarben.  Durch  additive 
Farbmischung  dieser  Primärfarben 
kann  jeder  beliebige  Farbton  erzeugt 
werden.  Dieses  Prinzip  wird  bei  der 
Farbbildröh re  angewendet. 

Jeder  Bildpunkt  der  Farbbildröhre 
muß  jede  Farbe  darstellen  können. 
Jeder  Punkt  besteht  aus  drei  kleinen 
Leuchtstreifen  in  den  Farben  Rot. 
Grün  und  Blau.  Ls  wird  mit  drei 
Llektronenstrahlen  (drei  Katoden) 
gearbeitet,  wobei  jeder  Strahl  nur  auf 
die  Leuchtstreifen  seiner  ihm  zuge¬ 
ordneten  Farbe  trifft.  Es  gibt  also  eine 
Katode  für  Rot.  eine  für  Grün  und 
eine  für  Blau. 

Anmerkung:  Die  liier  vorgenomme¬ 
nen  Funktionsbeschreibungen  be¬ 
ziehen  sich  aufdas  Prinzip  der  RGB- 
An Steuerung  der  Bildröhre  an  den 
Katoden.  Die  anderen  Verfahren,  w  ie 
RGB-Ansleuerung  an  den  Gittern 
oder  die  Farbdiffercnzansteuerung 
an  Gittern  bzw.  Katoden  seien  hier 
der  Vollständigkeit  halber  erwähnt. 
Schauen  wir  uns  jetzt  das  Block¬ 
schaltbild  des  Farbmonitors  an. 

Wir  sehen  in  Bild  5.  daß  der  gesamte 
Slrahlsteuerungsteil  genauso  funktio¬ 
niert  wie  beim  monochromen  Moni¬ 
tor.  Lediglich  im  Signalteil  haben  wir 
Ergänzungen,  deren  Aufgabe  es  ist, 
sen  beiden  kann  man  (G-Z) 
zu  rückgew  innen. 

Alle  drei  Farbdifferenzsignale  und 
das  Z-Signal  werden  der  RGB- 
Matrix  zugeführt,  in  der  die  Signale 
RGB  zur  Bildröhrenansleuerung  ge¬ 
bildet  werden. 

Wir  kennen  jetzt  das  vereinfachte 
Funklionsprinzip  des  Farbmonitors 
tut',  dem  FBAS-Signal  die  Bildin¬ 


haltsinformation  so  aufzubereiten, 
daß  die  drei  Signale  Rot.  Grün  und 
Blau  entstehen,  die  dann  direkt  die 
Bildröhre  steuern. 

Um  zu  verstehen,  wie  dieses  im 
Monitor  geschieht,  müssen  wir  wis¬ 
sen,  wie  die  Bildinformationen  im 
FBAS-Signal  enthalten  sind.  Einige 
Vereinfachungen  seien  erlaubt,  um 
zum  Verständnis  der  eigentlichen 
Thematik  unnötige  Details  nicht 
allzu  breit  auszubreiten. 

Die  Herstellung  des  FBAS-Signals 
hält  sich  natürlich  an  unsere  hier  gül¬ 
tigen  TV-Normen.  Eine  wichtige 
Eigenschaft  muß  dieses  Signal  mit¬ 
bringen,  Stichwort:  Kompatibilität. 
Dieses  Farbbildsignal  muß.  in  einen 
monochromen  Monitor  eingespeist, 
eine  normale  einfarbige  Darstellung 
ermöglichen.  Hierzu  werden  die  Aus¬ 
gangssignale  einer  Farbfernsehka- 
mera  (Rot.  Grün,  Blau)  dahingehend 
korrigiert,  wie  das  Helligkeitsempfin¬ 
den  des  menschlichen  Auges  auf 
diese  drei  Farben  reagiert. 

Das  Leuchtdichtesignal,  wie  es  im 
Farbmonitor  benötigt  wird,  das  aber 
ebenso  beim  Anschluß  eines  mono¬ 
chromen  Monitors  als  Bildinforma¬ 
tionssignal  dient,  wird  daher  nach 
folgender  Formel  hergestellt: 

Y  =  0,30  R  +  0,59G  +  0,1 1  B 


Wie  wir  später  sehen  werden,  wird  im 
CPC  das  Lumineszenzsignal  für  den 
grünen  Monitor  entsprechend  er¬ 
zeugt.  Um  die  Bandbreite  des  entste¬ 
henden  FBAS-Signals  klein  zu  hal¬ 
ten.  werden  in  der  Fernsehtechnik  ne¬ 
ben  dem  Z-Signal  nicht  die  drei 
Primärfarben  Rot,  Grün  und  Blau, 
sondern  zwei  Fafbdifferenzsignale 
übertragen,  und  zwar  (R-Z)  und  (B- 
Z).  Zur  Übertragung  der  Farbinfor¬ 
mation  werden  also  nur  diese  beiden 
Signale  verwandt.  Zu  ihrer  Erzeu¬ 
gung  gibt  Bild  6  nähere  Informationen. 

Diese  beiden  Signale  werden  dann  je 
einem  Farbträger  aufmoduliert,  ad¬ 
diert.  und  als  Farbartsignal  zusam¬ 
men  mit  dem  Z-Signal,  den  Synchron- 
und  Austastsignalen  zum  FBAS- 
Signal  summiert. 

in  unserem  Farbmonitor  werden  aus 
diesem  Eingangssignal  wieder  die 
Einzelsignale  erzeugt.  Die  Synchron¬ 
signale  werden  abgetrennt  und 
analog  dem  monochromen  Monitor 
zur  synchronen  Ablenksteuerung  der 
Elektronenstrahle  benutzt.  Das  Z- 
Signal  wird  abgetrennt  und  der  RGB- 
Matrix  zugeführt.  Das  abgetrennte 
Farbartsignal  wird  de  moduliert  und 
in  die  beiden  Farbdifferenzsignale 
(R-Z)  und  (B-Z)  gewandelt.  Aus  die- 
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ausreichend  genug,  um  die  Schnitt¬ 
stellenproblematik  beim  Computer¬ 
anschluß  zu  verstehen. 


Welche  Schnittstellen  gibt  es? 


Sehen  wir  uns  einmal  Bild  7  an. 

Es  gibt  prinzipiell  drei  Einspeisungs¬ 
punkte  für  unsere  Signale,  wenn  wir 
den  Fernseher  als  einen  erweiterten 
Monitor  miteinbeziehen.  Der  übli¬ 
che  Signalweg  beim  Fernseher  über 
den  Antenneneingang  bis  zur 
Bildröhre  ist  der  längste,  d.h.  er  ist  mit 
den  meisten  Bildverarbeitungsvor¬ 
gängen  behaftet,  was  zu  Einbußen  bei 
der  Bildqualität  führt.  Die  ursprüng¬ 
lichen  Bildinformationssignale  lie¬ 
gen,  wie  auch  beim  CPC.  als  RGB- 
Signale  vor.  Speisen  wir  diese  über 
eine  RGB-Schnittstelle  in  den  Moni¬ 
tor,  so  haben  wir  den  kürzesten  Weg 
zwischen  Erzeugung  und  Darstel¬ 
lung  der  Bildsignale.  Hier  ist  es  mög¬ 
lich,  die  beste  Bildqualität  zu  erzeu¬ 
gen.  Der  Schneider  CPC  bietet  uns 
diesen  Weg,  wie  wir  noch  sehen  wer¬ 
den,  an. 

Wollen  wir  einen  Fernseher  nutzen, 
so  müssen  die  Signale  im  zuerworbe¬ 
nen  Modulator  über  ein  FBAS- 
Signal  zu  dem  modulierten  HF- 
Signal  umgeformt  werden,  um  in  den 
Antennen-Eingang  in  dem  vom  Fern¬ 
seher  erwarteten  Format  eingespeist 
zu  w;erden.  Im  Fernseher  werden  alle 
diese  gemachten  Umformungen  wie¬ 
der  "rückwärts”  vollzogen,  damit  am 
Ende  wieder  die  ursprünglichen 
RGB-Signale  zur  Bildröhrenansteue- 
rung  vorliegen.  Sie  erkennen  in  Bild 
7,  welch  ein  langer  Signalweg  mit  vie¬ 
len  Verarbeitungsvorgängen  hiervor¬ 
liegt,  und  wie  leicht  hier  Verfälschun¬ 
gen  der  ursprünglichen  Signale  ent¬ 
stehen  können. 

Es  gibt  heute  übrigens  schon  Fernse¬ 
her,  die  einen  RGB-Eingang  besit¬ 
zen.  Bei  Benutzung  des  Fernsehers 


bitte  immer  versuchen,  einen  der 
Bildschirmgröße  angemessenen  Ab¬ 
stand  zum  Fernseher  einzuhalten. 
Betrachten  wir  den  eigentlichen 
Monitor:  zwei  Einspeisungspunkte 
sind  zu  erkennen.  Leider  verstehen  es 
Hersteller  aller  Bereiche  immer  wie¬ 
der  hervorragend,  selbst  eine  solch 
einfach  herstellbare  Schnittstellen¬ 
normierung,  wie  in  diesem  Bereich, 
durch  eigenbrödlerische  Eigenlösun¬ 
gen  zum  Problem  für  den  Anwender 
werden  zu  lassen.  Alle  nur  möglichen 
Kombinationen  der  notwendigen 
Eingangssignale  kommen  in  der 
Praxis  vor.  Die  gebräuchlichen 
Schnittstellen  sind  in  den  Tabellen  2 
und  3  abgebildet. 

Bei  der  zweiten  und  der  vierten  Version 
kann  der  Synchronisationseingang 
noch  aufgeteilt  sein  in  je  einen  Ein¬ 
gang  für  vertikale  und  horizontale 
Synchronisation.  Dieses  würde  dann 
noch  einen  zusätzlichen  Leiter 
bedeuten. 

Die  erste  Version  ist  die  bedeutendste 
und  sollte  bei  einem  universell  ein- 
setzbaren  Monitor  unbedingt  vor¬ 
handen  sein.  Beim  Farbmonitor  muß 
bei  diesen  vier  Schnittstellen  aller¬ 
dings  mit  einem  Abfall  an  Bildquali¬ 
tät  gegenüber  den  nachfolgend  be¬ 
schriebenen  RGB-Anschltissen  ge¬ 
rechnet  werden  (zu  langer  Signalweg: 
Siehe  oben). 

Alle  drei  Schnittstellen  haben  als  ge¬ 
meinsames  Kennzeichen  die  drei 
Eingangssignale  Rot,  Grün  und  Blau. 
Eingespeist  in  einen  Monitor  werden 
sie  fast  direkt  zur  Steuerung  der 
Bildröhre  benutzt,  was  eine  geringe 
Signalverfälschung,  d.h.  eine  hohe 
Bildqualität  gewährleistet. 

Es  gibt  Unterschiede  im  Aussehen 
der  Farbsignale  zwischen  der  Analog- 
und  der  TTL-Schnittstelle.  Die  Be¬ 
zeichnung  TTE  kommt  aus  dem  Be¬ 
reich  der  elektronischen  Logikschal¬ 
tungen  (Transistor-Transistor- Logik). 
Hier  wird  nur  mit  den  Signalen  "wahr 
-  unwahr”  bzvv.  den  diesen  Zustände 
repräsentierenden  Gegebenheiten, 


w'ie  z.B.  "Strom  ein  -  Strom  aus"  oder 
"Signal  5  Volt  -  Signal  0  Volt", 
gearbeitet. 

Bei  unserer  RGB-TTL-Schnittstelle 
bedeutet  dies,  die  Farbsignale  kön¬ 
nen  nur  zwei  Zustände  einnehmen, 
d.h.  z.B.  für  das  Signal  Rot:  "Rot  ein  - 
Rotaus”(5  V-0  V).  Jeder  derdrei  Ein¬ 
gänge  kann  nur  diese  zwei  Zustände 
einnehmen.  Das  heißt,  es  können 
sich  acht  verschiedene  Eingangssi¬ 
tuationen  ergeben,  oder  anders  aus¬ 
gedrückt.  es  können  acht  verschie¬ 
dene  Farben  dargestellt  werden  (die 
drei  Primärfarben  und  ihre  Misch¬ 
farben:  rot,  grün,  blau,  weiß,  schwarz, 
gelb.  cyan.  purpur). 

Beim  RGB-Analog  Eingang  können 
die  Farbsignale  in  einem  bestimmten 
Bereich  beliebige  Werte  annehmen, 
d.h.  das  Signal  Rot  kann  stufenlos 
(analog)  entsprechend  verschiedener 
Leuchtdichten  andere  Werte  darslel- 
len.  Die  Zahl  der  verschiedenen  Ein¬ 
gangssituationen  ist  unendlich.  Es 
können  alle  Farben  dargeslellt 
werden. 

Der  RGBI-Eingang  stellt  eine 
Mischung  aus  den  beiden  anderen 
Versionen  dar.  Die  Farbsignale  RGB 
liegen  alsTTL-Signale  vor.  Um  mehr 
Farben  darzustellen,  muß  ein  extra 
Intensitätssignal  zum  Monitor  ge¬ 
führt  werden.  Bei  allen  drei  Versio¬ 
nen  ist  es  denkbar,  die  Synchronisa¬ 
tionssignale  über  einen  extra  Ein¬ 
gang  einzuspeisen,  oder  diese  Signale 
mit  über  die  RGB-Anschlüsse/u  füh¬ 
ren.  Es  kommt  beides  in  der  Praxis 
vor. 


Die  Schnittstelle  des  CPC 


In  Bild  8  sehen  wir  die  Monitor- 
Schnittstelle  des  CPC. 

Zum  Anschluß  eines  Farbmonitors 
werden  uns  die  drei  Farbsignale  R,  G 
und  B  zur  Verfügung  gestellt,  und 
zwar  in  analoger  Form.  Die  noch  be¬ 
nötigten  Synchronisationssignale 
(vertik.  u.  horiz.)  werden  uns  au  feiner 
extra  Leitung  angeboten.  Dieses  ist 
also  die  RGB-ANALOG-Schnittstelle 
mit  extra  sync-Leilung. 

Ein  weiteres  Ausgangssignal  ist  er¬ 
kennbar.  Dieses  wird  in  den  Handbü¬ 
chern  mit  Leuchte  oder  Lumineszenz 
bezeichnet.  Es  dient  zum  Anschluß 
eines  monochromen  (grünen)  Moni¬ 
tors.  Aus  den  drei  Farbsignalen  wird 
ein  etwa  dem  Helligkeitsempfinden 
des  Auges  für  diese  drei  Farben  ent¬ 
sprechendes  Signal  geformt,  das 
durch  Addition  der  entsprechenden 
Farbanleile  entsteht.  Die  Synchroni¬ 
sationssignale  werden  hinzuge- 
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elektor  computing  (ec) 
Die  Sonderheft-Reihe 
für  alle,  die 
mehr  aus 
ihrem 
Computer 
machen 
wollen 


Ob 


era//  da 
oder 


Wo 


es 


direkt 


Ze'tsch 


beirr, 


riften 


Verl 


agi 


9ibt 


Viele  Leser 
haben  uns  brieflich 
oder  telefonisch 
mitgeteilt: 
ec  4  war  das 
bisher  beste  Heft 
der  ec-Reihe. 


Unsere  Antwort: 


Mau$- 


Interf. 


re* 

3ce 


ec  5  erscheint  am  1.7.1986,  DM  18,— 


In  ec  5 
gehts  erst 
richtig  rund! 


•  Schwerpunktthema:  Interface-Techniken  und  Ergonomie.  Mit  der  Schaltung  eines  hochauflösenden  Maus  Interfaces  (12  Bit) 
und  einer  Software-Maus  für  den  C64.  Und  dazu  noch  ein  Selbstbau  Plotter. 

•  65816/EC-65K:  Software  vom  Betriebssystem  bis  zu  Compilern  gibt  es  bereits  für  den  neuen  65816- Prozessor  —  Näheres  in  ec  5. 

•  Dazu  passend:  Die  neue  SRAM-Karte  für  den  EC-65K.  Beliebig  oft  im  System  einsetzbar,  wahlweise  64  KByte  oder  256  KByte 
pro  Karte. 

•  EC  65  und  EC-65K:  Jetzt  ist  sie  da  die  Z80-CP/M- Karte.  Wahlweise  4,  6  oder  8  MHz,  Speicher  wahlweise  von  64  KByte  bis 
1  MByte,  RAM-Floppy,  Software  Spooler  usw.  sind  gleich  "eingebaut”.  Und  eine  Menge  Software  gibts  kostenlos  dazu! 

•  Das  UCSD-p-System  wird  in  einem  ausführlichen  Artikel  beschrieben. 

•  V30:  der  8086- Kompatible  Prozessor  von  NEC  —  in  ec  5  beginnen  wir  mit  seiner  Beschreibung.  Für  den  EC  65(K)  ist  eine  Karte 
mit  diesem  Prozessor  in  Vorbereitung  —  MS-DOS  auf  dem  EC  65(K>  heißt  die  Perspektive. 

•  Weitere  Themen  in  ec  5:  64  K Byte-Zusatzspeicher  für  Kolorator  und  andere  Anwendungen,  Auto  Dial  (automatisches  Wählen) 
fürs  Mini-Modem,  Datenbank-Systeme  unter  FLEX,  FORTH  auf  dem  EC-65.  Assembler-Programmierung  unter  CP/M. 

•  Und  zum  guten  Schluß  ein  komfortables  Modem-Programm  für  den  EC-65(K)  und  andere  6502  und  65816  Computer! 


Elektor  Verlag  Süsterfeldstr.  25,  5100  Aachen 


Bericht 


Tabelle  2  Tabelle  3 


mischt  und  es  entsteht  ein  composite 
v  ideo  Signal  ( BAS). 

Dieses  Signal  ist  ungeeignet  /um  An¬ 
schluß  eines  Farbmonitors.  Hierzu 
benötigen  wir.  wie  wir  wissen,  ein 
FBAS-Signal.  dessen  Entstehung 
\orab  beschrieben  wurde. 


Fazit  und  Tips 


Beim  Anschluß  eines  Fremdmoni- 
lo  r s  d a r f  ma  n  n  ic  h  t  \  e rges se n .  d aß  d e r 
Schneider-Monitor  auch  die  Span¬ 
nungsversorgung  für  den  CPC  ent¬ 
hält.  Der  Schneider-Monitor  muß 
also  immer  noch  mit  dem  C  PC  über 
die  Span n u ngsversorgu ngsei ngä nge 
verbunden  und  eingeschaltet  sein, 
auch  wenn  man  überden  Moniloran- 
schluß  einen  Fremdmonitor  mit 
Bildsignalen  \ersorgt.  Besitzt  man 
eine  externe  Spannungsversorgung, 
so  entfällt  diese  Notwendigkeit. 

Was  ist  also  zu  beachten? 

Fall  A) 

t  PC  -Besitzer  mit  Farbmonitor:  Der 
monochrome  Fremdmonitor  sollte 


eine  composite  Video  (BAS)-Sehnitt- 
stelle  besitzen.  Die  Schnittstelle  com¬ 
posite  video  separate  svnc  kann  eben¬ 
falls  vom  CPC  versorgt  werden. 

Fall  B) 

CPC-Besitzer  mit  grünem  Monitor: 
Der  Farbmonitor  als  Fremd monitor 
sollte  über  RGB-ANALOG  Eingänge 
verfügen.  Die  Synchronisationssigna¬ 
le  sollten  über  einen  extra  sync- 
F.ingang  eingespeist  werden  können. 

Schaut  man  sich  die  Monitore  in  den 
Verkaufsregalen  an.  so  sieht  man  die 
Eingangsbuchsen  oft  nur  mit  RGB 
bezeichnet.  Fragen  Sie  hier  nach, 
oder  lassen  Sie  sich  die  Spezifikatio¬ 
nen  im  Benutzerhandbuch  zeigen. 
RGB-ANALOG  wird  auch  als  RGB- 
LINEAR.  RGB-TTL  als  RGB- 
DI  Ci  IT  AL  bezeichnet. 

Schließen  Sie  Ihren  CPC  an  einen 
Farbmonitor  mit  TTL-Eingüngen  an, 
so  werden  Sie  zwar  ein  farbiges  Bild 
bekommen,  aber  bei  Überprüfung 
werden  Sie  feststellen,  daß  von  den  16 
Farben,  die  der  CPC  darstellen  kann, 
nur  8  sichtbar  sind. 

Legen  Sie  Wert  darauf,  einen  mög¬ 
lichst  universell  einselzbaren  Farb¬ 


monitor  zu  erwerben,  dann  sollte  er 
folgende  Eingänge  besitzen: 

a)  composite  video  (FBAS) 

b)  separate  video  (Luminanz 
Chrominanz) 

c)  RGB-ANALOG 

d)  RGB-TTL 

e)  RGBl 

Möchten  Sie  vor  dem  Erwerb  eines 
Monitors  außer  dem  Sichttest  viel¬ 
leicht  die  Spezifikationen  mit  ande¬ 
ren  Monitoren  vergleichen,  so  sind 
folgende  Parameter  wichtig: 

a)  Bandbreite  (möglichst  groß;  zB.: 
22  MHz) 

b)  Auflösung  horiz.  (möglichst  groß; 
z.B.:  920  Punkte) 

c)  Auflösung  vert.  (möglichst  groß: 
z.B.:  350  Punkte) 

Als  Maß  für  die  Aullösung  wird  oft 
auch  die  Angabe  gemacht,  wieviel 
Linien  aufgelöst  werden  oder  einfach 
auch  nur  80  Zeichendarstellung 
angegeben. 

Einige  Farbmonitore  können  auf 
Schalterdruck  zur  monochromen 
Bildwiedergabe  umgeschaltet  wer¬ 
den.  was  die  Auflösung  verbessern 
kann  und  den  Einsatzbereich  dieses 
Monitors  erweitert. 

Die  Schnittstelle  des  Schneider  CPC 
stellt  uns  also  gängige  Signale  zur 
Verfügung,  mit  denen  wir  handels¬ 
übliche  qualitativ  hochwertige  Moni¬ 
tore  anschließen  können.  Beim 
Farbmonitor  auf  RGB-ANALOG 
Eingänge  achten.  Tauchen  Probleme 
auf,  so  ist  das  Monitorverbindungs¬ 
kabel  auf  richtige  Belegung  der 
Steckeranschlüsse  zu  überprüfen. 
Die  C’PC-Anschlüsse  siehe  Hand¬ 
buch:  die  Monitoranschlüsse  sind 
aus  der  Monitordokumentation  zu 
entnehmen.  (Dipl. -Ing.  V.  Klug) 
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Bild  8:  Der  CPC-  Monilorausgang 


-  f-i  L  UN 

-  'i  SY  NC 

T-rj  ri?Dt 


i  _r 


U) 


(  v ; 


t  • 


( ?)  / 


58  CPC  8  '86 


CP/M 


IlIHHIlimi 


Wie  in  der  vorangegangenen  Folge  be¬ 
reits  angekündigt,  soll  unser  Thema 
auch  dieses  Mal  wieder  die  Hochspra¬ 
che  FORTRAN  sein.  Nachdem  beim 
letzten  Mal  der  NEVADA  FORTRAN- 
Compiler  vorgestellt  wurde,  wollen  wir 
in  dieser  Folge  ein  FORTRAN- 
Programm  schreiben  und  einen  Ver¬ 
gleich  sowohl  mit  CBASIC  als  auch  in 
der  nächsten  Folge  mit  PASCAL  an¬ 
stellen.  Ausgangspunkt  ist  zunächst 
einmal  das  bereits  in  der  Ausgabe  Nr.  6 


Umweg  über  den  Schneider-BASIC 
eigenen  Editor  gehen  muß.  Ist  man 
glücklicher  Besitzer  des  HISOFT  C- 
Compilers  aus  gleichem  Hause,  so 
kann  man  auch  sehr  gut  den  hier  mit¬ 
gelieferten  WORDSTAR-kompati- 
blen  ED80  bzw.  ED82  einsetzen.  Die¬ 
ser  Fullscreen-Editor  hat  nur  eine 
Länge  von  ca.  8kB  und  enthält  die 
wichtigsten  Befehle  zum  Erstellen 
von  Programmen.  Anders  als  bei 
WORDSTAR  wird  der  gesamte  zu 
bearbeitende  Text  auf  einmal  in  den 
Arbeitsspeicher  geladen,  wodurch 
zeitraubende  Diskettenzugriffe  ent¬ 
fallen.  Dadurch  kann  ein  Programm- 
listing  z.B.  wesentlich  schneller  ge- 
scrollt  werden.  Als  sehr  angenehm 
wird  auch  die  Tatsache  empfunden, 
daß  der  Cursor  nicht  mehr  nachläuft 
und  im  Gegensatz  zu  WORDSTAR 
wieselflink  nach  rechts  oder  links  be¬ 
wegt  werden  kann. 


Programmieren  in  FORTRAN 


1234567 


PROGRAM  MAIN 

C 

C  EINLESEN  DER  3  VARIABLEN  E.F,G 

C 

READ ( 1 7 1000)  E.F.G 
1000  FORMAT  <3</>Fl0.5) ) 

C 

WERT  =  MULTI  (E,F,G> 

C 

C  AUSGABE  DER  BERECHNETEN  WERTE 

C 

WRITE< 1,2000)  E,F,G,WERT 
2000  FORMAT  <  4 ( / , F 1 0 . 5 ) > 

C 

STOP 

END 

C 

FUNCT I ON  MULT I ( A , B , C) 

c 

A  =  A  *  A 
B  =  B  *  B 
C  =  B  *  A 
MULTI  =  C 

C 

RETURN 

END 


CP/M 


und  seine  Möglichkeiten 


abgedrucktc  Listing  einer  FUNC¬ 
TION  in  CBASIC. 


Nichts  geht  ohne  Editor 


Beim  Schreiben  eines  Programmes 
sind  wir  natürlich  erst  einmal  wieder 
auf  einen  vernünftigen  Editor  ange¬ 
wiesen.  Leider  konnte  sich  Schnei- 
derData  bisher  noch  nicht  dazu 
durchringen.  NEVADA  FORTRAN 
mit  diesem  wichtigen  Werkzeug  aus- 
zurüsten,  so  daß  man  auf  ein  eigenes 
Textverarbeitungsprogramm  ange¬ 
wiesen  ist,  z.B.  CONTEXT  (s.a.  CPC 
Nr.  4)  oder  den  auch  hier  möglichen 


Jetzt  soll  es  aber  endlich  losgehen: 
Unser  kleines  CBASIC-Programm, 
das  wir  nun  in  die  Sprache  FOR¬ 
TRAN  umschreiben  wollen,  bestand 
aus  einem  sogenannten  Hauptpro¬ 
gramm,  dem  wir  den  Namen  MAIN 
gegeben  hatten  und  einer  FUNC¬ 
TION  mit  Namen  MULTI,  die  von 
MAIN  aufgerufen  wurde.  Die 
FUNCTION  hatte  lediglich  die  Auf¬ 
gabe.  die  drei  von  MAIN  übergebe¬ 
nen  Werte  gemäß  den  drei  enthalte¬ 
nen  arithmetischen  Anweisungen  zu 
multiplizieren  und  die  Ergebnisse 
zurückzugeben.  In  einem  typischen 
FORTRAN  IV  Listing  würde  das  so 
aussehen: 


Wenn  man  sich  dieses  Listing  etwas 
genauer  ansieht,  erkennt  man  wahr¬ 
scheinlich  eine  gewisse  Ähnlichkeit 
mit  einem  BASIC-Programm,  die 
entwicklungsgeschichtlich  bedingt 
ist. 

Fangen  wir  einfach  einmal  vorne 
an. 

Die  Zahlen  von  1  -  7  gehören  nicht 
zum  eigentlichen  Listing,  sondern 
dienen  der  Verdeutlichung  einer 
ganz  speziellen  Eigenart  von  FOR¬ 
TRAN,  wobei  es  ganz  besonders  auf 
die  Spalten  von  1  -  7  ankommt.  Diese 
Spalten  sind  nur  für  bestimmte  An¬ 
weisungsmarken  (Labels)  zugelas¬ 
sen,  z.B.  im  Zusammenhang  mit 


EPSON-Drucker 

FX-85  1329,-  FX-105  1739,- 

LQ-1500  3198,- 

JX-80  1699,-  HI-80  1245,- 

Seikosha-Drucker 

GP-SOOAoVC  538,-  GP-500AS.CPCO  AT  598,- 

Gp-700A.VCo  CPC  998,-  SP  80C  A  oder  I  798,- 

SPlOOOA,ASo  VC  B28,-  SP1000CPC  878,- 

SP  ‘000  AP  Imagewrrter  kompatibel  lür  Macintosh  u 
Apple  llcdirektansch  ießb.  948,- 

Panasonic 

KX-P1090  675,-  KX-P 1091  848,- 

KX-P 1092  1068,-  KX-P315lT,rcraic!r  1528,- 

Star-Drucker 

|  Gemini  1 0il  _ sagenhafte 698,-  1 


SG  10 

mir  889,- 

SG  10C 

839,- 

SD  10 

1198,- 

SR  10 

1598,- 

SG  15 

1225,- 

SD  15 

1598,- 

SR  15 

1999,- 

Okidata  MICROLINE 

Typ182. 183, 192, 193  Sonderpreise 

Vortex  Laufwerke  und  Karten,  alle  Software 
vom  M  &  T  Verlag  l.eferbar 


Commodore 

C 128,  PC  10,  PC  20  a.Anfr. 

Schneider  PC 

CPC-46“  grün  grünem  Monitor  725,- 

CPC-464  mitfarbigem  Monitor  1198,- 

Floppy-Lajfwerk3"  725,- 

Disketten  3"  f  Schneider  CPC  10  St.  99,- 

CPC-664  mil  grünem  Monitor  1248,- 

CPC-664milColor-Momlor  1699,- 

CPC-6128mitgrüneriMomtor  1448,- 

CPC-6128mitCoior-Monilor  1898,- 

NLQ-401  Drucker  699,- 

Joyce  2098,- 

Hewlett  Packard 

HP-41 CV  439,- 

HP-41 CX  648,- 

Disketten  u.  Zubehör  dm/iosi 

3Vz"  1  D  Markendiskette  75,- 

3  Vs"  2  D  Markendiskette  129- 

5’/«"  1  D  No  name  23- 

5'/«"  2  D  No  name  29,- 

Sharp 

PC  1401  215,-  PC  K02  299,- 

PC1500A  399,-  PC1500A+E150  699,- 

PC515P  645,-  PC  2500  780,- 


D&G  Datentechnik,  Postt  431 ,  Bogenstr.  53,  S  02  61  /40  88  39, 5400  Koblenz 


Programmiersprache  COMAL 

Pascal  zu  kompliziert?  Basic  zu  "alt”?  Logo  unzureichend? 
Warum  nicht  gleich  C0MAL-80 

Diese  Sprache  ist  strukturiert,  schnell  und  modern.  Auch  Computerneulinge  können 
schon  nach  1 4  Tagen  fließend  programmieren. 

C0MAL-80  wird  in  verschiedenen  Bundesländern  für  den  Schulunterricht  empfohlen 
und  vielfach  in  Universitäten  eingesetzt: 

Jetzt  auch  liir  alle  Schneider  CPC  Computar 

Diskette  C0MAL-80  Version  1.83  mit  Handbuch  DM  69,— 

COMAL-80  Modul  in  Vorbereitung 

COMALGRUPPE-DEUTSCHLAND 

Fi.  0.  Balz,  2270  Ulorsun/Ffthr,  Tal.:  04003/500  Modem  554 
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einer  FORMAT-Anweisung,  die  in 
dem  obigen  Programm  gleich  zwei¬ 
mal  auftaucht.  Für  diese  ersten  7 
Spalten  gelten  sehr  strenge  Rege¬ 
lungen. 

In  der  ersten  Spalte  darf  z.B.  nur  ein  C 
stehen.  Ist  dieses  C  gesetzt,  so  wird  die 
ganze  nachfolgende  Zeile  als  Kom¬ 
mentar  interpretiert,  vergleichbar  ei¬ 
nem  REM  unter  BASIC.  Die  eigentli¬ 
che  FORTRAN-Anweisung  darf  erst 
in  Zeile  7  beginnen,  wie  z.B.  die 
READ-Anweisung,  die  mit  einem 
INPUT  in  BASIC  vergleichbar  ist.  Da 
beim  Entstehen  der  Sprache  die 
Programm-  und  Dateneingabe  nur 
über  genau  spezifizierte  Lochkarten 
möglich  war,  erwartet  FORTRAN  IV 
auch  heute  noch  bei  der  Eingabe  von 
Daten  eine  genaue  Angabe  der  Vor- 
und  Nachkommastellen,  was  z.B. 
beim  Einlesen  von  Diskettendaten 
sogar  sehr  nützlich  sein  kann.  In 
unserem  Fall  erfolgt  diese  Spezifizie¬ 
rung  durch  die  auf  die  READ-An- 
weisung  folgende  FORMAT-Anwei¬ 
sung,  die  über  das  Label  1000 
zugeordnet  wird.  Dieses  Label  finden 
wir  daher  auch  innerhalb  der  Klam¬ 
mer,  nach  dem  Komma,  in  der  voran¬ 
gegangenen  READ-Anweisung  wie¬ 
der.  Über  die  1  vor  dem  Komma  wird 
außerdem  noch  ein  bestimmter  Ein¬ 
gabekanal  zugeordnet,  z.B.  die  Kon¬ 
sole.  Der  Inhalt  der  FORMAT-An¬ 
weisung  ”3(00.5)”  besagt,  daß  drei 
(F)loatingpoint-Variablen  eingelesen 
werden  sollen,  die  jeweils  aus  10  Zei¬ 
chen,  einschließlich  Dezimalpunkt, 
bestehen.  Die  Anzahl  der  Nachkom¬ 
mastellen  beträgt  genau  5.  Wenn  z.B. 
die  Zahl  3  über  die  Konsole  eingege¬ 
ben  werden  soll,  müssen  jetzt  aber 
nicht  etwa  die  entsprechenden  Vor- 
und  Nachkommastellen  mit  Nullen 
aufgefüllt  werden,  der  Dezimalpunkt 
hinter  der  3,  also  ”3.”,  darf  jedoch  auf 
keinen  Fall  vergessen  werden. 
Weiterhin  ist  es  mit  dieser  FORMAT- 
Anweisung  nicht  möglich,  mehr  als  5 
Stellen  nach  bzw.  mehr  als  4  Stellen 
vor  dem  Komma  korrekt  einzulesen. 
Bei  der  Ausgabe,  die  durch  das 
WRITE-Statement  vergleichbar  mit 
einem  PRINT  unter  BASIC  erfolgt 
und  ebenfalls  eine  FORMAT- 
Anweisung  benötigt,  werden  die  ent¬ 
sprechenden  Nachkommastellen  mit 
Nullen  ausgefüllt.  Z.B.  4.00000.  Für 
Anwender,  denen  diese  Prozedur 
etwas  zu  umständlich  erscheint,  hält 
NEVADA  FORTRAN  auch  wesent¬ 
lich  vereinfachte,  an  FORTRAN  77 
angelehnte  Ein-/Ausgabe-Statements 
bereit,  die  dann  allerdings  nicht  dem 
ANSI  66  Standard  entsprechen.  Nun 
wollen  wir  aber  endlich  zum  Aufruf 
der  FUNCTION  MULTI  kommen. 


FUNCTION  unter  FORTRAN 


Unser  Listing  beginnt,  wie  in 
FORTRAN  vorgeschrieben,  mit  dem 
Hauptprogramm  MAIN.  Dieses  wird 
mit  einem  STOP  und  einem  END  be¬ 
endet.  Daran  anschließend  folgt  die 
FUNCTION  MULTI,  die  immer  als 
eine  selbständige  Programmeinheit 
betrachtet  wird  und  infolgedessen 
ebenfalls  nach  dem  RETURN  mit 
einem  END  abgeschlossen  werden 
muß.  Wenn  Sie  das  Programm  jetzt 
starten,  geben  Sie  doch  einfach  wie¬ 
der  die  Zahlen  2,3  und  4  für  die  Va¬ 
riablen  e,f  und  g  ein,  damit  wir  unser 
Resultat  mit  der  CBASIC-FUNC- 
TION  vergleichen  können.  Wenn  Sie 
alles  richtig  gemacht  haben,  muß  die 
Ausgabe  lauten: 

4.0000  9.00000  36.00000  36.00000 

Beim  Vergleich  dieser  Ausgabe  mit 
der  Ausgabe  in  CBASIC  werden  Sie 
feststellen,  daß  hier  ein  erheblicher 
Unterschied  aufgetreten  ist.  Nach 
dem  Verlassen  der  FUNCTION  wird 
nicht  nur  der  Variablen  MULTI  ein 
Wert  zugewiesen,  sondern  es  werden 
auch  die  für  die  lokalen  Variablen 
a,b,c  berechneten  Ausdrücke  an  das 
Hauptprogramm  übergeben  und 
schließlich  über  die  WRITE-Anwei- 
sung  ausgegeben.  Die  Variablen  a,b 
und  c  heißen  deshalb  lokal,  weil  sie 
nur  in  der  FUNCTION  MULTI 
lokale  Gültigkeit  besitzen.  Es  wäre 
also  auch  möglich,  im  Hauptpro¬ 
gramm  mit  genau  den  gleichen  Va¬ 
riablennamen  a,b  und  c  zu  arbeiten, 
die  dann  beliebige  andere  Werte  an¬ 
nehmen  könnten.  Beim  Einsprung  in 
die  FUNCTION  wird  der  Inhalt  der 
Variablen  e,f  und  g  entsprechend 
ihrer  Reihenfolge  in  der  Parameterli¬ 
ste  an  die  Variablen  a,b,c  übergeben, 
wobei  der  eigentliche  Variablenname 
überhaupt  keine  Rolle  spielt.  In  der 
FUNCTION  wird  also  gerechnet  mit 
a=2,b=3  und  c=4.  Noch  scheint  alles 
genauso  abzulaufen,  wie  unter 
CBASIC.  Jetzt  kommt  aber  der  ent¬ 
scheidende  Unterschied.  Beim  Errei¬ 
chen  der  RETURN-An Weisung  wer¬ 
den  die  neu  berechneten  Werte  für  a,b 
und  c  wieder  entsprechend  der  Para¬ 
meterliste  an  die  Variablen  e,f  und  g 
im  Hauptprogramm  zurückgegeben 
und  sind  von  nun  an  nicht  mehr  de¬ 
finiert.  Diese  Übergabe  ist  ein  typi¬ 
sches  Beispiel  für  ein  sogenanntes 
’call  by  reference”.  Beim  Aufruf  einer 
FUNCTION  in  FORTRAN  wird  also 
mit  dem  Inhalt  der  Variablen  nicht 
der  Variablenname,  sondern  die  Re¬ 
ferenz,  d.h.  die  Speicheradresse  der 
jeweiligen  Variablen  übergeben,  was 
dazu  führt,  daß  a  und  e,b  und  f,c  und 


g  den  gleichen  Speicherplatz  belegen. 
Anders  bei  einem  "call  by  value",  das 
wir  unter  CBASIC  kennengelernt  ha¬ 
ben.  Hier  wird  eine  Kopie  der  betref¬ 
fenden  Variablen  erzeugt,  die  dann  in 
der  FUNCTION  weiterverarbeitet 
wird.  Nach  dem  Rücksprung  in  das 
Hauptprogramm  ist  das  Original  also 
noch  vorhanden.  Das  spart  natürlich 
nicht  gerade  Speicherplatz,  kann 
aber  bei  der  Rekursion  unter  PAS¬ 
CAL.  also  der  Möglichkeit,  daß  eine 
FUNCTION  sich  selbst  aufruft,  sehr 
nützlich  sein.  Diese  Möglichkeit  bie¬ 
ten  weder  FORTRAN,  das  alle  Va¬ 
riablen  ausschließlich  mit  einem 
"call  by  reference”  übergibt,  noch 
BASIC.  PASCAL  sieht  zusätzlich 
auch  die  Möglichkeit  vor.  Variablen 
mit  einem  "call  by  value"  zu  überge¬ 
ben. 


SUBROUTINES  unter 
FORTRAN 


Alles,  was  Sie  bisher  über  FUNC¬ 
TIONS  erfahren  haben,  gilt  im  be¬ 
sonderen  Maße  auch  für  eine 
FORTRAN  SUBROUTINE,  die  in 
der  Konzeption  noch  stärker  auf  den 
Datentransfer  mit  einem  "call  by  refe¬ 
rence”  ausgelegt  ist.  Eine  FUNC¬ 
TION  muß  bei  der  Rückkehr  in  das 
Hauptprogramm  einen  definierten 
Wert  haben,  d.h.  in  unserem  Fall  muß 
der  Name  MULTI  mindestens  ein¬ 
mal  auf  der  linken  Seite  einer  Glei¬ 
chung  in  der  FUNCTION  auftau¬ 
chen.  Der  eigentliche  Sinn  einer 
FUNCTION  besteht  deshalb  nur 
darin,  diesen  einen  Wert  zu  berech¬ 
nen  und  nicht  aus  dem  Abfallpro¬ 
dukt  auch  noch  Variablen  an  das 
aufrufende  Programm  zurückzuge¬ 
ben.  Wir  haben  diesen  Weg  jedoch 
gewählt,  um  einen  Vergleich  mit 
CBASIC  zu  ermöglichen.  Wie  ja  be¬ 
reits  beim  Test  von  CBASIC  festge¬ 
stellt  werden  mußte,  ist  das  SUB- 
ROUTINE-Pendant  GOSUB  unter 
BASIC  bedauerlicherweise  nicht 
mehr,  als  ein  etwas  komfortableres 
GOTO. 

Damit  ist  das  FORTRAN-Listing  ab¬ 
gehandelt,  wobei  wir  Ihnen  natürlich 
nur  einen  kleinen  Einblick  in  die 
Möglichkeiten  von  FORTRAN  IV  ge¬ 
ben  konnten.  Wer  noch  mehr  über 
FORTRAN  erfahren  möchte,  sollte 
das  NEVADA  FORTRAN  Hand¬ 
buch  zu  Rate  ziehen.  Beim  nächsten 
Mal  geht  es  dann  weiter  mit  PAS¬ 
CAL,  wobei  wir  auf  das  vorgestellte 
FORTRAN-Listing  noch  einmal 
Bezug  nehmen  werden. 

Dipl.  Ing.  H.  Scheruhn 
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Regungslos  liegt  der  kleine  weiße  Ball  auf  dem  satten  Grün. 
Zwischen  ihm  und  dem  letzten  Loch  liegen  sechs  Meter.  Sechs 
Meter,  die  an  die  Nerven  gehen.  Welcher  Schläger?  Woher  weht 
der  Wind?  Und  wie  stark?  Wie  wächst  das  Gras?  Wie  muß  der 
Bail  laufen?  Dann  ist  es  soweit.  Konzentration,  ein  gefühlvoller 
Kick  und . den  Rest  lesen  Sie  im  Sportteil  Ihrer  Zeitung. 


Wer  wissen  will,  was  wir  außer  Golf  Construction  Set  noch  zu 
bieten  haben,  dem  schicken  wir  gern  unseren  Gesamtkatalog. 


Name 


Straße 

ImfllöR 

PLZ  Ort 

An:  ariclasofl  Carl-ßertelsmann-Str  161.  4830  Gütersloh 

Von  Experten 
für  Experten. 

Lokomotive 

Eine  unterhaltsame  Übung  der  vier  Grundrechenarten  für 
aJIe  Lernenden  und  alle  geneigten  ”Hirnakrobaten”. 


Viele  Leser  werden  sicher  noch  den  erleichterten  Seufzer 
aus  Ihrer  Schulzeit  im  Ohr  haben,  mit  dem  die  lästigen 
Hausaufgaben  abgeschlossen  wurden,  um  sich  danach 
schleunigst  der  angenehmen  Seite  des  ”Schülerdaseins” 
zuzuwenden:  dem  Spielen.  Und  so  mancher  Leser  wird 
diesen  Seufzer  mittlerweile  von  seinen  eigenen  Kindern  zu 
hören  bekommen:  Hausaufgaben  machen  ist  öde,  viel  lie¬ 
ber  möchte  man  spielen!  Da  ersteres  aber  nun  einmal 
nicht  gerade  unwichtig  ist  -  wie  vor  allem  Eltern  und  Leh¬ 
rer  den  betroffenen  Schüler  immer  wieder  zu  überzeugen 
versuchen,  letzteres  aber  wesentlich  mehr  Vergnügen  be¬ 
reitet,  bietet  sich  eine  Verbindung  von  beidem  ideal  an. 
Ein  Ergebnis  dieser  Bemühung  haben  Sie  hier  vor  sich 
liegen. 

Zweck  dieses  für  zwei  Spieler  ausgelegte-n  Programmes  ist 
es,  wie  aus  dem  Untertitel  ja  schon  zu  entnehmen  ist,  das 
Üben  der  vier  Grundrechenarten.  Dazu  muß  jeder  Spieler 
seine  Lokomotive  so  schnell  wie  möglich  über  eine  (mit 
Haltepunkten  versehene)  Strecke  zum  Zielbahnhof  fah¬ 
ren:  Der  Computer  gibt  drei  Zahlen  vor,  und  der  Spieler 
muß  diese  mit  Hilfe  der  Grundrechenarten  derart  ver¬ 
knüpfen,  daß  das  Ergebnis  ein  größtmögliches  Voran¬ 
kommen  ermöglicht.  Dabei  ist  erstens  auf  die  Regel 
"Punktrechnung  vor  Strichrechnung”  zu  achten,  und 
zweitens  muß  die  Rechnung  eine  ganze  Zahl  ergeben. 
Damit  man  nun  die  Operatoren  nicht  einfach  auf  gut 
Glück  zwischen  die  gegebenen  Zahlen  setzt  und  sich  vom 
Ergebnis  überraschen  läßt,  will  der  Rechner  dieses  auch 
vomSpielerwissen.  Hat  man  richtig  gerechnet,  so  fährt  die 
Lok  des  Spielers  entsprechend  des  Ergebnisses  vor  oder  - 
bei  negativem  Ergebnis  -  zurück.  Allerdings  liegen  auf  der 
Strecke  Haltepunkte,  die  nicht  überfahren  werden  dürfen; 
man  muß  sie  genau  erreichen  und  notfalls  ein  wenig  Ran¬ 
gieren”.  Als  Gegengewicht  dazu  darf  man  bei  genauem 
Treffen  eines  Bonusfeldes  zehn  Felder  vorrücken.  Auch 
kann  man  seinen  Gegenspieler  ein  wenig  "ärgern”:  Ge¬ 
lingt  der  Versuch,  sich  auf  das  gleiche  Feld  wie  dieser  zu 
setzen,  so  muß  er  20  Felder  zurückfahren. 


Na  denn  -  viel  Spaß  beim  Pauken!  (V.Reher/MC) 


10  REM  . .  [15661 

20  REM  •  Lokomotive  •  [7551 

30  REM  •  von  *  [556] 

40  REM  *  V.Reher  4.86  *  1 1 348 1 

50  REM  [1586] 


60  MODE  1 :INK  0 , 1 : INK  1,24: INK  2, 1,24: INK  [53971 


3, 12, 24: PAPER  0 : PEN  1 ;BORDER  1 : SPEED  INK  6 
,20 

70  DEFINT  a-y : DEFREAL  s 

80  DIM  strecket 70 ): posi ( 1 ) =0: posi (2 ) =0: str 

ecket  70 )=1 

90  zurueck=20 :REM  gegnerische  Lok  zuruecks 
etzen 

100  rz$="+-*/M 
110  RANDOMI ZE  TIME 
120  GOSUB  2370 
130  WINDOW# 1 ,1 ,25,23,25 

140  REM  . .  Titelbild  . . 

150  x$=" LOKOMOTIVE  " 

160  FOR  x=34  TO  1  STEP-1 : LOCATE  X,12:PRINT 
lokl$ ; SOUND  7,5,10, ,,,20:FOR  p=1  TO  200:N 
EXT : LOCATE  x, 12: PRINT  loesch$ 

170  TAG : MO VE  620- ( 40-x ) *1 0 , 206 : PRINT  x$;:T 

AGOFF 

180  NEXT 

190  ENV  1,1,15,1,100,0,1,12,-1,8,2,-1,20 
200  SOUND  7,880,200,0,1 

210  FOR  x=24  TO  1  STEP-1 :INK  1 ,x:FOR  p*1  T 
0  200: NEXT: NEXT 
220  CLS : INK  1,24 

230  REM  *••»**»»  Namen  eingeben  ******* 

240  LOCATE  1 , 3 : PRINT"Spieler  1  -  Bitte  dei 
nen  Namen  eingeben" 

250  LOCATE  1 , 5 : PRINT" >" : xp=3 : yp=5 : lang=1 5 : 
lasc=32 :hasc=1 22 :GOSUB  1870 
260  namel $=UPPER$ { LEFT$ ( tx$ , 1 ) ) +LOWER$ ( MID 
$(tx$ ,2 ) ) 

270  LOCATE  1 , 7 : PRINT"Spieler  2  -  Bitte  dei 
nen  Namen  eingeben" 

280  LOCATE  1 , 9 : PRINT" >" : yp=9 :GOSUB  1870 
290  name2$=UPPER$ (LEFT$ ( tx$ , 1 ) )+LOWER$(MID 
$( tx$ , 2  ) ) 

300  PRINT: PRINT: PRINT"Braucht  ihr  die  Spie 
lregeln" ; 

310  PRINT"  (j/n)";: PEN  2: PRINT"  ?";:PEN  1 
320  xp=37 :yp=VPOS( #0 ) : lang=1 :lasc=74:hasc= 
110 : GOSUB  1670 

330  IF  LOWER$(tx$)="n"  THEN  490 

340  IF  LOWER$(tx$)<>"j"  THEN  320 

350  REM  *•**•*•*  Spielregeln  ******•••• 

360  CLS: PRINT: PRINT"Eure  Aufgabe  besteht  d 
arin,  eine" : PR INT" Lokomotive  ueber  die  Sch 
ienen  bis  auf" 

370  PRlNT"die  Zahl  70  zu  fahren." : PRINT 
380  PRlNT"Die  Lokomotive  bewegt  sich,  wenn 
ihr":PRINT"die  Rechenzeichen  '+-*/1  zwisc 
hen  die" 

390  PRINT"drei  zufaellig  gezogenen  Zahlen 
setzt.": PRINT 

400  PRlNT"Die  "CHR$ ( 24 ) "invers"CHR$ ( 24 )  " 
dargestellten  Zahlen  muessen" : PRINT"genau 
erreicht  werden." 

410  PRlNT"lst  das  Ergebnis  der  Rechnung  ke 
ine" : PRINT" ganze  Zahl,  dann  bleibt  die  Lok 
stehen" :PRINT"und  der  andere  Spieler  ist 
an  der" : PRINT"Reihe. " 

420  PRINT"Ist  die  Zahl  negativ,  dann  faehr 
t  die": PRINT"Lok  zurueck." 

430  PRlNT"Wenn  eine  Lok  auf  das  "CHR$(24)" 
XX"CHR$ ( 24 ) "  kommt,  dann": PRINT"faehrt  sie 
automatisch  10  Felder  in":PRINT"Richtung 
Ziel. 

440  PR INT: PR INT" Kommt  eine  Lok  auf  ein  Fel 
d,  auf  dem": PR INT" bereits  die  andere  Lok  s 
teht,  so  muss":PRINT"die  letztere  20  Felde 
r  zurueck." 

450  PEN  3: LOCATE  6, 25: PRINT" >  Starten  mit 

SPACE-Taste  <":PEN  1 

460  x$=INKEY$:IF  x$=""  THEN  460 

470  IF  ASC(x$)<>32  THEN  460 

480  REM  . . Level  •••••••••**•• 

490  FOR  x-0  TO  69 : strecket x ) «0 :NEXT 

500  CLS : BORDER  1 : PRINT :PRINT"Welcher  Schwi 

erigkeitsgrad  ?" 

510  PRINT: PRINT: PRINT"  1  =*  leicht" :P 

RINT: PRINT"  2  -  mittel" : PRINT:PRINT" 

3  ■  schwer" 

520  x$»INKEY$:IF  x$=""  THEN  520 
530  x*ASC(x$):IF  x<49  OR  x>51  THEN  520 
540  IF  x  =  49  THEN  level  =  1 : strecket  20 ) =1 :str 
ecke ( 28 ) =2 : strecke (41 ) =2 : strecke ( 50 ) =1 
550  IF  x=50  THEN  level=2 : strecke{ 20 ) =1 : str 
ecket  26)  =2:  strecket  35  )=*1 : strecke ( 38) =2: str 
ecket  50 )=1 :strecke(60 )=1 

560  IF  x=51  THEN  level=3 : strecket  1 0 ) =1 : str 


11  247) 
[3121  1 

(2318  1 

(5401 

117771 

[817  1 

[1079  ] 

(1815) 

(5761 

(69561 


[21001 

[3501 

[22381 

[14841 

[32401 

[817] 
[1902  3 
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(30351 

(5242) 
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11988] 

(8937) 
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[6435  ] 


[5150  ) 
[10571  ) 


[12257  ] 


[43161 
(10306  ) 


(81171 


[45901 

[2640  1 
[12131 
(13301 
[1860] 
[49621 

(6398) 


(2676) 

[18261 

[50151 

[59651 


[5344  1 


62  CPC  8  '86 


CAL 


ecke( 20 )=1 : strecke ( 40 ) =1 : strecket  23 ) =2 :str 

ecke( 50 ) =1 : strecket  60 ) =1 

570  BORDER  12:INK  2 ,24: INK  3,24 

580  REM  •***•**••  spieler  1  *********** 

590  CLSrGOSUB  1980 

600  LOCATE  2,1: PRINT  lokr$ 

610  GOSUB  2300 

620  INK  2,1 ,24:INK  3,24 

630  GOSUB  1360 

640  GOSUB  1560 

650  GOSUB  1690:IF  dezimal  TUEN  dezimal=0:G 
OSUB  960 :GOTO  780 

660  IF  falsch  THEN  falsch=0 :GOSUB  990:GOTO 
780 

670  FOR  x=posi(1)+1  TO  posi ( 1 )+summe-1 
680  IF  strecke(x)=1  THEN  merker=-1 : GOSUB  1 
050:x=posi(1 )+summe 
690  NEXT  x 

700  IF  merker  THEN  merker=0 :GOTO  780 

710  IF  SGN( summe ) <0  THEN  st=-1 : summe=-MIN ( 

ABS{ posi (1 )) ,ABS (summe) )  ELSE  st=1 

720  y*posi ( 1 ) : posi ( 1 )=posi(1 }+ summe: GOSUB 

1 1 20:summe*0:y=posi (2 ) : GOSUB  1120 

730  LOCATE  37,19:PRINT  US ING"####"; posi { 1 ) 

740  IF  posi ( 1 ) =70  THEN  1200 

750  IF  strecke ( posi (1 ) )=2  THEN  GOSUB  1080: 

summe»10:GOTO  710 

760  IF  posi ( 1 ) <  >0  THEN  IF  posi ( 1 ) =posi ( 2 ) 
THEN  GOSUB  1 020 : summe=-MIN( posi ( 1 ), zurueck 
) :y=posi ( 2 ) : posi ( 2 ) =posi ( 2 ) +summe: st=-1 :GO 
SUB  1120:surame=0:y=posi(1 ):GOSUB  1120:LOCA 
TE  37,24:  PRINT  USING"####  " ;  posi  (  2  ) 

770  REM  *»*****•••  spieler  2  •**•***••* 

780  INK  2,24: INK  3,1,24 
790  GOSUB  2300 
800  GOSUB  1360 
810  GOSUB  1560 

820  GOSUB  1690:IF  dezimal  THEN  dezimal=0:G 
OSUB  960: GOTO  610 

830  IF  falsch  THEN  falsch=0 :GOSUB  990:GOTO 
610 

840  FOR  x*posi(2)+1  TO  posi ( 2 )+summe-1 
850  IF  streckefx ) =1  THEN  merker=-1 : GOSUB  1 
050 :x=posi ( 2 )+summe 
860  NEXT  x 

870  IF  merker  THEN  merker=0 :GOTO  610 

880  IF  SGN( summe )<0  THEN  st=-1 : summe=-MIN( 

ABS( posi (2 )) ,ABS( summe ) )  ELSE  st=1 

890  y=posi ( 2 ) : posi ( 2 ) =posi ( 2 )+summe:GOSUB 

1 1  20:summe=0:y=posi ( 1 ) : GOSUB  1120 

900  LOCATE  37 ,24:  PRINT  USING"####"  ;  posi  ( 2  ) 

910  IF  posi (2) =70  THEN  1200 

920  IF  strecke( posi (2 ) )=2  THEN  GOSUB  1080: 

summe=1 0 :GOTO  880 


[1708  1 
[1746  3 
[904  ) 
[1485  3 
[8631 
(786  3 
[923  3 
[899  3 
[4030  3 

[2610  3 

[2951  3 
(30183 

[3563 
11988  3 
[4199  J 

(4281 3 

(37853 
(1521  3 
[3096  3 

(12027  3 


(1357  3 
(271  J 
1863  1 
[9233 
[8993 
(4056  1 

(2692 ) 

(31053 

(36273 

(356) 
[1998  ) 
[3571  3 

(5322) 

(2127  3 
C1985  3 
(2301  3 


930  IF  posi { 2 ) <  >0  THEN  IF  posi ( 2 ) =posi ( 1 ) 
THEN  GOSUB  1 020 : summe=-MIN(posi ( 2 ), zurueck 
) :y=posi < 1 ) :posi ( 1 ) =posi(1 )+summe:st=-1 :G0 
SUB  1120:summe=0:y=posi(2):GOSUB  1120:LOCA 
TE  37,19:  PRINT  USING"####" ;  posi  ( 1  ) 

940  GOTO  610 

950  REM  **•**•*•*•  Meldungen  ********* 

960  LOCATE# 1 ,1 , 3 : PRINT# 1 , "  Das  Ergebnis  is 
t  nicht":PRINT#1 ,  "  ganzzahlig  I  ":  PRINT#  1  ,  “ 
Ergebnis=";  :PRINT#1  , USING"##.  ###"; summe; 
970  FOR  p*1  TO  5000 :NEXT 
980  CLS#1 : RETURN 

990  LOCATE# 1,1,3: PRINT# 1 , "  Das  Ergebnis  is 
t  leider" : PRINT#1 , "  nicht  richtig  !":PRINT 
#1 ,"  Ergebnis=" ; : PRINT# 1 ,USING"##";summe; 
1000  FOR  p=1  TO  5000: NEXT 
1010  CLS#1: RETURN 

1020  LOCATE# 1,1 ,3: PRINT# 1 , zurueck;"  Felder 


[14193  3 


(41  1  ) 
(21 41  3 
(7829  3 


(1  354  ) 
[1242  3 
(1  1  333  3 


(1  354  3 
[12423 
(4533) 


*  Software  im  EPROM* 


Software  nie  mehr  laden  -  Fast  100  %  freier  Speicher  im  CPC  !!! 
Ein  System  das  ungeahnte  Möglichkeiten  schafft. 


UTOPIA  (Amor  Ltd) 

52  Routinen,  die  eine  echte  Hilfe  für  jeden  CPC-Anwender  darsiellen.  U.a.  vollständiger 
Diskettenmonitor,  Druckerspooler,  Hardcopy,  Kopierfunktion  g.  Befehle  wie  Find, 
REPLACE,  MOVE,  VARS,  ARRAYS.  STATUS,  TOKENS,  COPY,  LOAD,  SAVE.  VERIFY, 
TYPE,  LIST,  DUMP,  INFO,  FORMAT,  DISCCOPY,  D1SCTEST,  ACCESS,  ERA,  REN, 
DEDIT,  HELP,  CALL,  MDUMP.  ROMOFF  u.  weitere,  die  manche  Pobleme  2um  Kinder 
spiel  werden  lassen. 

(siehe  Software  Reviews  CPC  Int.  5.86} 

EPROM  11 9,-  DM 

MAX  AM  (Amor  Ltd)  »Assembler  *  Monitor  *  Editor  * 

Ein  280  Entwicklungssystem  das  Profiansprüchen  gerecht  wird.  ‘Erlaubt  hybride  Basic/ 
Maschinencode-Programmc  zu  schaffen  *  Quellcode  kann  als  Teil  eines  Basic-Programrns  ein¬ 
gegeben  werden  “  *  bedingte  Assemblierung  möglich  *  olle  Standardinstruktionen  zzgl.  eini 
ger  Variationen  *  zusätzlich  folgende  Kommandos:  LIST  (PI,  NOLIST,  PRINT,  PAUSE, 
PAGE,  TITLE,  PLEN,  WIDTH,  DUMP  *  Dor  Editor  stellt  fast  alle  Möglichkeiten  einer  erst¬ 
klassigen  Textverarbeitung  zur  Verfügung  *  ausgezeichnete  Menueführung  läßt  das  50  seiti 
ge  deutsche  Handbuch  fast  überflüssig  werden  ‘ 

Kennen  Sie  ein  System,  das  leistungsfähiger  ist?  Vergleichen  Sie  einmal.  Wir  schicken  Ihne« 
gerne  unsere  ausführliche  Programmoeschreibung.  (siehe  auch  Testbericht  c’t  4.86) 

Cass.  89,~  DM  Disk.  109,- DM  EPROM  169,- DM  ROM-Modul  239,- DM 


PROTEXT  (Amor  Ltd) 

Gute  Textverarbeitungsprogramme  gibt  es  einige.  Aber  eine,  die  wie  Protext  sofort  nach 
dem  Einschalten  zur  Verfügung  steht  und  mehr  als  40  KB  Tnxtspelcher  (ohne  Speicherer¬ 
weiterung)  bietet,  halten  wir  schon  für  etwas  Besonderes.  PROTEXT  bietet  komfortable 
Formatierung*  u.  Editierungsmöglichkeiten,  Blockverschiebungen.  Tabulatoren,  Suchen  u. 
Ersetzen,  Ookumentenmode,  Kopf-  u  Fußzehen,  Zeilenumbruch,  Druckersteuerzeichen, 
deutschen  Zeichensatz  u.  v.  a.  m. 

EPROM  169,-  DM 

Was  wate  unsere  erstklassige  Software  im  EPROM  ohne  eine  preiswerte  EPROM-Kartc? 

*EPROM-Karte  64  KB*  (cpc  464/664) 


4  freie  Steckplätze  für  die  gängigen  EPHOM-Typen  2/64  und  27128.  Durchgeführter  Er¬ 
weiterungsbus  (Floppyanschluß)  (CPC  464) 

129,-  DM  (CPC  464) 
149  _  DM  (CPC  664) 

Wir  führen  sämtliche  Hardwareprodukte  der  Fa.  VORTEX,  sowie  preiswerte  Aufrüstkits 
für  SP  64.  Fordern  Sie  unseren  Katalog  gegen  1,—  DM  Porto  ah. 

Preise  zzgl  5,-  DM  Versandkostenanteil.  Ab  300,--  DM  versandkostanfrei 

Ralf  Probst,  EDV-Service,  Eichenstraße  6, 4100  Duisburg  1 7 
Tel.:  0  21  36/3  28  70  u.  3  83  64, 15.00  -  20.00  Uhr 


BEKANNTMACHUNG 

Bei  unserem  allseits  bekannten  und  beliebten  Telefon-Service, 
dem  „Heißen  Draht’1,  gibt  es  eine  Veränderung. 

Sie  können  Ihre  Fragen  und  Anregungen  von 

1700  -  20°°Uhr 

an  die  Redaktion  von  Schneider  CPC  International  richten. 
Auf  Ihren  Anruf  freuen  sich:  Michael  Ceol  (Joyce),  Michael 
Ebbrecht  (Hardware),  Stefan  Ritter  (Redaktion),  Thomas 
Morgen  (Programmierung)  und  Heinrich  Stiller  (Spiele/Ad- 
ventures). 

JEDEN  MITTWOCH  AM 

HEISSEN  DRAHT 
Tel.:  05651/8702 


8  '86  CPC  63 


CAL 


zurueck  1" 

1030  FOR  p*1  TO  6000 :NEXT 
1040  CLS# 1: RETURN 

1050  LOCATE#  1,1,3:  PRINT#  1  , "  Du  willst  doch 
nicht  die" ; : PRINT#1 , "  naechste  Haltestell 
e" : PRINT# 1 , "  ueberfahren  ?" 

1060  FOR  p=1  TO  6000 : NEXT 
1070  CLS# 1: RETURN 

1080  LOCATE#  1  ,1 , 3 :  PRINT// 1  ,  "  10  Felder  vorr 
uecken  ! " 

1090  FOR  p=1  TO  5000: NEXT 
1100  CLS#1: RETURN 

1110  REM  *********  Lok  bewegen  ******** 
1120  lok$=lokr$:FOR  x=y  TO  y+summe  STEP  st 
1130  IF  ( x  >9  AND  x<20)  OR  (x>29  AND  x<40) 
OR  ( x  >49  AND  x<60)  OR  x>69  THEN  xp=29-VAL 
( RIGHT$  < STR$ ( x ) ,  1  ) ) *3 : lok$=lokl$ :GOTO  1150 
1 1 40  xp=VAL(RIGHT$(STR$(x) ,  1  )  ) *3+2 : lok$=lo 
kr$ 

1150  yp=INT( x/ 1 0 ) *3+1 : LOCATE  xp,yp: PRINT  1 
ok$: SOUND  7,50,10,, ,,20:FOR  p=1  TO  200:NEX 
T: LOCATE  xp,yp : PRINT  loesch$ 

1160  NEXT 

1170  LOCATE  xp,yp: PRINT  lok$ 

1180  RETURN 

1190  REM  *********  Spiel-Ende  . . 

1200  punktel =punkte1 +posi ( 1 ) 

1210  punkte2=punkte2+posi (2 ) 

1220  LOCATE  37, 20: PRINT  USING"####" ; punkte 
1 

1230  LOCATE  37, 25:  PRINT  USING"####" ;  punkte 
2; 

1240  INK  2,24: INK  3,24 

1250  IF  punktel >punkte 2  THEN  LOCATE# 1 ,1,3: 
PRINT# 1,"  Damit  hast  du  gewonnen" : PRINT# 1 , 
"  ";name1$ 

1260  IF  punktel < punkte 2  THEN  LOCATE#1 , 1  , 3 : 
PRINT# 1,"  Damit  hast  du  gewonnen" : PRINT# 1 , 
"  ";narae2$ 

1270  FOR  p=1  TO  8000 :NEXT 
1280  CLS #  1 

1290  PRINT#1,"1  =  Spiel  fortsetzen": PRINT# 
1,"2  =  Spiel  neu  starten":PRINT#1 ,"3  =  End 
e"; 

1300  x$= INKEY$ : IF  x$=""  THEN  1300 
1310  x=ASC(x$ ) : IF  x<49  OR  x>51  THEN  1300 
1320  IF  x=50  THEN  posi ( 1 ) =0 : posi { 2 ) =0 :GOTO 
220 

1330  IF  x=51  THEN  CLS : PRINT"Das  Programm  k 
ann  mit" : PRINT"CONT  < RETURN  >" : PRINT"fortge 
setzt  werden": END 

1340  posi(1 )=0:posi(2)=0:GOTO  590 

1350  REM  «*••****  Zufallszahlen  ******* 

1360  zahl ( 1 ) =INT(RND*3 ) +1 : zahl ( 2 ) =INT(RND* 

5 ) : zahl ( 3  ) =INT(RND*6 )+1 : lauf =1 2 : z=lauf-5 

1370  FOR  y=1  TO  lauf 

1380  FOR  x=1  TO  3: SOUND  7,100,1,7 

1390  PRINT  CHR$( 24): LOCATE  33+x,3:PRINT  RI 

GHT$  (STR$(x)  ,  1  ) :  PRIN.T  CHR$  (  24  ):  LOCATE  33+x 

, 3 : FOR  p=1  TO  y * 1 2 : NEXT  p: PRINT  RIGHTS (STR 

$(x),1):IF  y >z  AND  x=zahl(1)  THEN  x=3:y=la 

uf 

1400  NEXT  x : NEXT  y 

1410  PRINT  CHR$( 24): LOCATE  33+zahl (1 ) , 3 : PR 

INT  RIGHTS (STR$ (zahl <1 )),1 ): PRINT  CHR$(24) 

1420  FOR  y=1  TO  lauf 

1430  FOR  x=0  TO  4: SOUND  7,150,1,7 

1440  PRINT  CHR$( 24 ): LOCATE  34+x,6:PRINT  RI 

GHT$ ( STR$ (x ) , 1 ) : PRINT  CHR$ ( 24 ): LOCATE  34+x 

, 6 : FOR  p=1  TO  y*8:NEXT  p:PRINT  RIGHTS ( STR$ 

(x),1):IF  y>z  AND  x=zahl(2)  THEN  x=4:y=lau 

f 

1450  NEXT  x:NEXT  y 

1460  PRINT  CHR$( 24): LOCATE  34+zahl ( 2 ) , 6 : PR 

INT  RIGHTS (STR$( zahl (2) ),1 ): PRINT  CHR$(24) 

1470  FOR  y=1  TO  lauf 

1480  FOR  x=1  TO  6: SOUND  7,200,1,7 

1490  PRINT  CHR$( 24): LOCATE  33+x,9:PRINT  RI 

GHT$ ( STR$ ( x ) , 1 ) : PRINT  CHR$ ( 24 ): LOCATE  33+x 

,9:FOR  p=1  TO  y *6: NEXT  p: PRINT  RIGHTS (STR$ 

(x),1):IF  y>z  AND  x=zahl(3)  THEN  x=6:y=lau 

f 

1500  NEXT  x:NEXT  y 

1510  PRINT  CHR$ ( 24 ): LOCATE  33+zahl { 3 ) , 9 : PR 
INT  RIGHTS ( STR$( zahl (3) ), 1 ): PRINT  CHR$(24) 
1520  LOCATE  33,13:PRINT  zahl ( 1 ) :LOCATE  35, 
1 3 : PRINT  zahl ( 2 ) :LOCATE  37,13:PRINT  zahl (3 
) 

1530  LOCATE  35 , 1 5 : PRINT" =" 


11184] 
[12421 
[7031  ] 


[11841 
[1242] 
(3147  ) 

[1  354  ] 
[1242] 
(1  454  ) 
(2982  ] 
[8805] 


[3110] 

[78801 


1350} 

[25071 

[5551 

11670) 

[2142] 

[2338 ] 

[13691 

(1917  1 

(183  J 
(5095 1 


[66551 


[8091 
(373  1 
[5004] 


[2596 ] 
[1713] 
[1620  ] 

[5849 ) 


[1101  1 
(20701 
[49981 

[1  305  1 
[20061 
[8825] 


[9801 

(41131 

[13051 

[20831 

[11765] 


(980) 
[4241  ) 

(13051 

120691 

[83061 


[980  1 
[3143] 

[60021 


[1902  1 


1540  RETURN 

1550  REM  ****  Eingabe  Rechenzeichen  *** 
1560  xp=35:yp=13:lasc=42:hasc=47; lang=1 : tx 
$="  " : GOSUB  1870 

1570  IF  INSTR( rz$,tx$)=0  THEN  1560 
1580  IF  zahl ( 2 )  =0  AND  tx$  =  "/"  THEN  1560 
1590  rzl $=tx$ 

1600  xp=37 ;GOSUB  1870 

1610  IF  INSTR( rz$ , tx$ ) =0  THEN  1560 

1620  rz2$=tx$ 

1630  REM  ******  Eingabe  Ergebnis  ****** 
1640  xp=36 :yp=1 5 : lasc=45 : hasc=57 : lang=2 :GO 
SUB  1870 

1650  IF  INSTR<  tx$, "/" ) <  >0  THEN  1640 
1660  IF  INSTR( tx$ ,".")<  >0  THEN  1640 
1670  ergebnis=VAL( tx$ ) 

1680  REM  *********  Berechnung  ********* 

1690  IF  rz2$  =  "/"  AND  rz1$  =  "/"  THEN  summe=z 

ahl ( 1 ) /zahl ( 2 ) /zahl ( 3 ) : GOTO  1830 

1700  IF  rz2$="/"  AND  rzl $<>"*"  THEN  zwsumm 

e=zahl (2 ) / zahl { 3 ) :GOTO  1800 

1710  IF  rz2$=" *"  AND  rz1$="/"  THEN  summe=z 

ahl < 1 ) / zahl ( 2 ) ‘zahl ( 3 ) :GOTO  1830 

1720  IF  rz2$  =  "*"  THEN  zwsumme=zahl ( 2 ) ‘zahl 

( 3 ) : GOTO  1800 

1730  IF  rz1$  =  "  +  "  THEN  zwsumme-zahl { 1 ) +zahl 
(2):GOTO  1770 

1740  IF  rz1$="-"  THEN  zwsumme=zahl ( 1 ) -zahl 
(2 ) :GOTO  1 770 

1750  IF  rz1$="*"  THEN  zwsumme=zahl ( 1 ) ‘zahl 
(2) -.GOTO  1770 

1760  zwsumme=zahl ( 1 ) /zahl { 2 ) 

1770  IF  rz2$="+"  THEN  summe=zwsumme+zahl ( 3 
) :GOTO  1330 

1780  IF  rz2$="~"  THEN  summe=zwsumme-zahl ( 3 
):GOTO  1830 

1790  summe= zw summe /zahl ( 3 ) :GOTO  1830 
1800  IF  rz1$="+"  THEN  summe=zahl { 1 ) +zwsumm 
e: GOTO  1830 

1810  IF  rz1$="-"  THEN  summe=zahl ( 1 ) -zwsumm 
e:GOTO  1830 

1820  summe=zahl ( 1 ) *zwsumme:GOTO  1830 
1830  IF  INT ( summe )< >summe  THEN  dezimal=-1 : 
GOTO  1850 

1840  IF  summe < >ergebnis  THEN  falsch=-1 
1850  RETURN 

1860  REM  *******  Eingaberoutine  ******* 
1870  WH ILE  INKEYS <>"":WEND: LOCATE  xp,yp:PR 
INT  SPACES  (LEN(  tx$  )  )  :  tx$=" "  :  LOCATE  xp,yp:-C 
ALL  &BB81 

1880  x$=INKEY$ : IF  x$=""  THEN  1880 
1890  x=ASC(x$ ) : IF  x=13  AND  tx$=""  THEN  196 
0 

1900  IF  x=1 27  AND  LEN(tx$)=0  THEN  GOTO  196 
0 

1910  IF  x=1 3  THEN  CALL  &BB84 : RETURN 
1920  IF  X=1 27  THEN  tx$=LEFT$ ( tx$ , LEN ( tx$ ) - 
1):PRINT  CHR$ ( 8 ) ; "  " ;CHR$ ( 8 ) ; : GOTO  1880 
1930  IF  LEN( tx$ ) =lang  THEN  1960 
1940  IF  x< läse  OR  x>hasc  THEN  1960 
1950  tx$=tx$+x$: PRINT  x$;:GOTO  1880 
1960  SOUND  4,1000,5,7, ,,15 :GOTO  1880 
1970  REM  *******  Bildschirmmaske  ****** 
1980  BORDER  24:FOR  y=1  TO  25:LOCATE  32,y:P 
RINT  CHR${ 1 49 ) ; :NEXT 

1990  FOR  y=1 1  TO  22  STEP  5: LOCATE  32,y:PRI 
NT  CHR$ (151); STRINGS (8,154) :NEXT 
2000  LOCATE  33 , 1 : PRINT"LEVEL" ; level 
2010  LOCATE  33, 2: PRINT  CHR$ ( 1 85 ); STRINGS ( 3 
, 1 86 );CHR$( 187): LOCATE  3 3, 3: PRINT  CHR$(188 
) ;"123":LOCATE  37, 3: PRINT  CHR$ ( 1 92 ): LOCATE 
33, 4: PRINT  CHR$ ( 1 89 ); STRINGS (3,1 90) ;CHR$( 
191  ) 

2020  LOCATE  33, 5: PRINT  CHR$ ( 1 85 ); STRINGS ( 5 
, 1 86 );CHR$( 187): LOCATE  3 3, 6: PRINT  CHR$(188 
); "01 234": LOCATE  39, 6: PRINT  CHR$ ( 1 92 ) :LOCA 
TE  3 3, 7: PRINT  CHR$ ( 1 89 ) ; STRINGS ( 5 , 1  90 ) ; CHR 
$(191  ) 

2030  LOCATE  33,8:PRINT  CHR$ ( 1 85 ); STRINGS ( 6 
,186); CHR $(187): LOCATE  33,9:PRINT  CHR$(188 
) ;"123456":LOCATE  40,9:PRINT  CHR$ ( 1 92 ) :LOC 
ATE  33,10 : PRINT  CHR$ ( 1 8 9 ) ; STRINGS ( 6 , 1 90 ) ; C 
HR$  (191  ) 

2040  LOCATE  33 , 1 2 : PRINT" +  -  *  /" 

2050  INK  2,24: PEN  2:LOCATE  33 , 1 7 : PRINT"Spi 
elerl " ; : PEN  1 : LOCATE  33,19:PRINT  "Pos:";:P 
RINT  USING"##.##";  posi  ( 1  ):LOCATE  33,20:PRIN 
T  "Pkt:"; : PRINT  USING"####"; punktel 
2060  PEN  3 : LOCATE  33 , 22 : PRINT"Spieler2 " ; : P 


[555] 
(2349  ] 
(3400  ] 

[2037] 
[1612] 
1916] 
(2271  1 
[2037] 
(1012) 
[1608] 
[4069  ) 

[1454] 
[1786  ] 
(1940  ] 
(1924  ) 
[2895  1 

[2722] 

(5243  ] 

[1984  ] 

(3754  ] 

(3443  1 

[1719  ) 

[2390  ] 
(24471 

[3998] 

(26801 

[2550] 

(29271 

[1617] 

(20361 

(2521  ] 
[555  ] 
(779  1 
(5208  ) 


[2672  ] 
[2872] 

[1546  1 

[1578  1 
(31621 

[1  294] 

(20791 

[4071 

[22661 

11842) 

(36231 

[4708] 

[2207] 

[10906 


[11868 


[8653 1 


11  363) 
(101 76 


188531 
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EN  IrLOCATE  33 , 24 : PRINT"Pos : " ; : PRINT  US ING 
"####" ;posi ( 1 ):LOCATE  33,25:PRINT  "Pkt:";: 

PRINT  USING" ####"; punkte2 ; 

2070  LOCATE  3 , 3  : PRINT"0 "  ;  : FOR  x  =  1  TO  9:PRI  15711) 
NT  CHR$(1 54 )CHR$( 154 )RIGHT$(STR$(x) ,1 );:NE 
XT: PRINT  vbr$ 

2080  LOCATE  1,9: PRINT  vbl$ ; : PRINT"1 9" ; : FOR  158921 
X=1 8  TO  10  STEP-1: PRINT  CHR$ (154 )RIGHT$ ( S 
TR$(x),2);:NEXT 

2090  LOCATE  2,9: PRINT"20" ; : FOR  x=21  TO  29:  [51341 
PRINT  C!IR$  ( 1  54  )  RIGHTS  ( STR$  ( X  )  ,2)  ;  :NEXT:PRI 
NT  vbr$ 

2100  LOCATE  1,15:PRINT  vbl$ ; : PRINT"39" ; :FO  [50511 
R  x=38  TO  30  STEP-1 SPRINT  CHR$ { 154 ) RIGHTS ( 

STR$(x) ,2) ; :NEXT 

2110  LOCATE  2,15: PRINT" 40" ; : FOR  x=41  TO  49  16241] 
: PRINT  CHR$ (154 ) RIGHTS (STR$ ( x ) ,2>; :NEXT:PR 
INT  vbr$ 

2120  LOCATE  1,21: PRINT  vbl$ ; : PRINT"59" ; : FO  [5801] 
R  x=58  TO  50  STEP-1: PRINT  CHR$ ( 1 54 ) RIGHTS ( 

STR$ ( x ) ,2) ; :NEXT 

2130  LOCATE  2 , 21 : PRINT"60" ; : FOR  x=61  TO  69  159451 
: PRINT  CHR$ <154 ) RIGHTS ( STR$ ( X ) , 2 ) ; :NEXT:PR 
INT  vbr$ 

2140  LOCATE  29,24:PRINT  "70" 

2150  REM  ******  Bahnhoefe  markieren  **• 

2160  f 1=0 :xp=29 : yp=6 : PRINT  CHR$(24) 

2170  FOR  x=1 0  TO  70 
2180  IF  fl  THEN  2230 

2190  LOCATE  xp,yp:IF  strecke(x)=1  THEN  PRI 
NT  USING" ; x ; 

2200  LOCATE  xp,yp:IF  strecke(x)=2  TUEN  PRI 
NT  "XX"; 

2210  IF  RIGHTS ( STRS (x ), 1 )="9"  THEN  fl=NOT 
fl:yp=yp+3: GOTO  2270 
2220  xp=xp~3 :GOTO  2270 

2230  LOCATE  xp,yp:IF  strecke(x)=1  THEN  PRI 
NT  USING"##" ;x; 

2240  LOCATE  xp,yp:IF  strecke(x)=2  THEN  PRI  £3445] 
NT  "XX"; 

2250  IF  RIGHTS (STR$(x) , 1 )="9"  THEN  fl=NOT  [39851 
fl:yp=yp+3:GOTO  2270 


2260  xp=xp+3  [11521 

2270  NEXT : PRINT  CHR$<24)  [13731 

2280  RETURN  [5551 

2290  REM  ******  Anzeige  loeschen  ******  [17931 

2300  LOCATE  34 , 3 : PRINT"1 23"  [1028] 

2310  LOCATE  34 , 6 : PRINT"0 1 234 "  [15161 

2320  LOCATE  34 , 9 : PRINT" 1 23456"  [14311 

2330  LOCATE  34 , 1 3 : PRINT"  "  [1410] 

2340  LOCATE  35,15:PRINT"  "  [19091 

2350  RETURN  1555] 

2360  REM  *****  Zeichen  definieren  *****  [21721 

2370  SYMBOL  AFTER  175  [14331 

2380  REM  ******  Lokomotive  rechts  *****  [1826) 

2390  SYMBOL  176,0,0,0,0,0,254,66,90  [13081 

2400  SYMBOL  177,0,0,0,62,34,28,20,21  [19071 

2410  SYMBOL  178,90,91,88,64,76,82,115,12  [20921 

2420  SYMBOL  179,151,245,4,2,50,73,207,48  [20551 

2430  REM  ******  Lokomotive  links  ••*••*  [17961 

2440  SYMBOL  180,0,0,0,124,68,56,40,168  [21721 

2450  SYMBOL  181,0,0,0,0,0,127,66,90  [19781 

2460  SYMBOL  182,233,175,32,64,76,146,243,1  [24731 
2 

2470  SYMBOL  183,90,218,26,2,50,74,206,48  [2123] 

2480  REM  •*  Rahmen  fuer  Zufallszahlen  •  [10451 

2490  SYMBOL  185,0,0,63,31,47,23,43,20  [18501 

2500  SYMBOL  186,0,0,255,255,255,255,255,0  [24531 

2510  SYMBOL  187,0,0,252,244,236,220,188,12  [25181 
4 

2520  SYMBOL  188,42,20,42,20,42,20,42,20  [1871  1 

2530  SYMBOL  189,43,22,45,26,53,0,0,0  [1870] 

2540  SYMBOL  190,85,170,85,170,85,0,0,0  [2488] 

2550  SYMBOL  191,124,188,92,172,84,0,0,0  [2336] 


2560  SYMBOL  1 92 , 1 24 , 1 24 , 1 24 , 1 24 , 1 24 , 1 24 , 1 2  (22551 
4,124 

2570  lokr$=CHR$ (176 )  +  CHR${ 177) +CHRS ( 8 ) +CHR  [31251 
$ ( 8 )+CHR$ { 1 0 )+CHR$ { 1 78 )+CHR$ ( 1 79 ) 

2580  lokl$=CHR$ ( 1 B0 )+CHR$( 181 )+CHR$  <  8 ) +CHR  [40761 
$ ( 8  )+CHR$ ( 1 0 )+CHR$ ( 1 82 )+CHR$ ( 1 83 ) 

2590  loesch$«CHR$ (  32  )+CHR$(  32  )+CHR$(  8  )+CIIR  13515) 
$ ( 8 )+CHR$ ( 1 0 ) +CHR$ ( 32 J+CHRS ( 32 ) 

2600  vbr$«CHR$ ( 156 )+CHR$ ( 8 ) +CHR$ ( 1 0 ) +CHRS (  [6417) 
1 49 )+CHR$( 8 )+CHR$( 1 0 )+CHR$( 149) +CHR$(8 )+CH 
( 1 0 ) ♦CHR$ ( 1 53 ) 

2610  Vbl$-CHR$(147 )+CHR$(8)+CHR$(11  )+CHRS(  [4801] 
1  49  )+CHR$  (  8  ) ♦CHR$  (11)  +01©$  (149)  +CHRS  ( 8  )  +CH 
R$ ( 1 1 )*CHR$ (150) 

2620  RETURN  [555] 


[17961 
(15921 
(14331 
(1034 1 
[6701 
[4245  1 

[34451 

[39851 

11  324  ) 
[4245] 


Die  Vorteile 
liegen  klar 


Computerschulung  bei  Leidinger  &  Haupenthal 
***  Joyce-Trainingsseminare  *** 

(von  Juli  bis  September  '86) 

Lerninhalte:  —  Clatühruiifl  In  dla  Arbeitsweise  von  LOCOSCRIPT 

-  Besonderheiten  und  Logik  von  LOCOSCRIPT 
Einsatzmöglichkeiten  des  Joyce 
Softwareüberblick 

Seminarformen:  1  Tagesseminare  i.d.  Regel  samstags  (199,-  DM) 

-  Hamburg,  München,  Frankfurt,  Bremen,  Hannover,  Köln,  Siegen, 
Dortmund,  Stuttgart,  Fralburg,  Nürnberg,  Mannheim,  Saarbrücken,  Trier 

2  Wochenendseminare  ab  31 0,-  DM  inkl  VP 

Motto:  Freizeit  und  Lernen  am  Wochenende,  mit  oder  ohne  Partner 

Informieren  Sie  sich  kostenlos  bei:  Laldlnger  ft  Haupenthal 

Kari-DlehhStr.  2 

6806  Nonnweller 
Tel.:  06173/7574 

Weitere  Angebote:  Computercamps  im  Herbst 

Einführung  in  die  Arbeitsweise  des  Computers  für  Erwachsene 


VIDEO'  1000  S 

Interface  zum  Digitalisieren  von 
Fernseh-  oder  Videobildern  für  den 

CPC  464-6128 

395,-  DM 

•  Auflösung  640  x  200  Pixel 

•  für  TV,  Rekorder  o.  Kamera 

•  2, 4  oder  16  Farben 

•  Aufnahmezeit  1/50  sek. 

•  incl.  Kurzfilmerstellung 

Demodisk  3"  gegen  Einsendung  von  15,-  DM  (Schein  o.  V- Scheck);  Info 
gratis.  Versand  p.  NN  oder  im  Fachhandel. 

Ing.  Büro  M;  Frieke,  Neue  Str.  13, 1000  Berlin  37,  Tel.:  030/801 8052 
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. Bücher . 

Korrektur  zu  Buch¬ 
besprechung  ”CP/M  Plus” 
von  Jürgen  Hückstädt 

Bei  der  Besprechung  des 
"CP/M  Plus”-Buches  vom 
Markt  &  Technik-Verlag 
(Heft  6/86,  S.  124)  ist  uns 
leider  ein  Fehler  unterlau¬ 
fen.  Der  letzte  Absatz  (ab: 
„Die  Krönung  ist...”)  gehört 
zu  einem  anderen  Buch, 
Jürgen  Hückstädt’s  sehr  gu¬ 
tes  Buch  enthält  keinen 
Anhang. 

Dieses  Versehen  bitten  wir 
vielmals  zu  entschuldigen. 


Mühleisen/Seipel 
Vom  Problem  zum 
Algorithmus 
Mentor-Verlag  1986 
144  Seiten 

ISBN  3-580-64750-4 
Preis:  21,80  DM 

Der  Mentor  Verlag  (der  üb¬ 
rigens  zur  Langenscheidt 
Verlagsgruppe  gehört)  stellt 
hier  den  ersten  Band  aus  der 
Reihe  "Informatik-Grund¬ 
lagen  für  die  systematische 
Programmierung  von  Com¬ 
putern"  vor.  Im  Mittelpunkt 
dieses  Bandes  steht  hierbei 
die  Umwandlung  des  Pro¬ 
blems  zu  einem  Algorith¬ 
mus. 

Anhand  zahlreicher  und  gut 
erläuterten  Beispiele  wird 
der  Lernende  Schritt  für 
Schritt  in  die  Materie  einge¬ 
führt.  Am  Anfang  steht  das 
Erkennen  und  Umsetzen  ei¬ 
nes  Problems  in  einen  Pro¬ 
grammablauf.  Dabei  werden 
die  Grundregeln  eingchalten, 
so  daß  die  erworbenen 
Kenntnisse  auf  jede  belie¬ 
bige  Programmiersprache 
angewandt  werden  können. 


um  ml  hihihi  mim . .  iiiiiium 


Ein  interessantes  und  emp¬ 
fehlenswertes  Buch,  das  sich 
nicht  nur  an  Schüler  wen¬ 
det. 

Schiro 

Grundwissen  Informations¬ 
verarbeitung 
Falken  Verlag  1986 
311  Seiten 
ISBN  3-8068-4314-7 
Preis:  58,-  DM 

Am  Anfang  war  der  Aba¬ 
kus.  Mit  dem  vorliegenden 
Buch  gibt  der  Autor  einen 
umfassenden  Überblick  über 
Entwicklung  Geschichte  und 
Anwendungen  der  Compu¬ 
tertechnologie. 

Die  Thematik  umfaßt  so¬ 
wohl  die  Entwicklung  von 
Hard-  und  Software,  als  auch 
die  neuen  Kommunikations¬ 
medien. 

Der  Autor  beschreibt  in  leicht 
verständlicher  Form  das 
Zusammenspiel  von  Mensch 
und  Maschine.  Selbst  kom¬ 
plizierte  Sachverhalte  wer¬ 
den  anschaulich  erläutert. 
Aufgrund  der  gegebenen 
Thematik  richtet  sich  die¬ 
ses  Buch  vor  allem  an  dieje¬ 
nigen,  die  als  Laien  mit  die¬ 


ser  Technik  konfrontiert 
werden,  ist  aber  auch  als 
Nachschlagewerk  für  Schule 
und  Studium  sehr  gut  ge¬ 
eignet. 

Hausbacher 

Das  Prozessor-Buch 

zum  Z-80 

Data  Becker  1985 

563  Seiten 

ISBN  3-89011-096-7 

Preis:  59,-  DM 

Das  ideale  Buch  für  Tech¬ 
niker  und  Maschinenspra¬ 
cheprogrammierer. 


Hauptbestandteil  dieses  sehr 
umfangreichen  Werkes  ist 
der  Z-80- Befehlssatz,  der  sehr 
ausführlich  beschrieben  und 
mit  Beispielen  versehen  ist. 
Weitere  Themen  sind  die 
serielle  und  parallele  Daten¬ 
übertragung,  Ein-/Ausgabe- 
techniken  sowie  die  An¬ 
schlußmöglichkeiten  von  Sy¬ 
stembausteinen. 

Ein  rundherum  als  gut  ge¬ 
lungenes  und  effektiv  ein¬ 
zusetzendes  Lehr-  und  Lem- 
buch  zu  bezeichnendes  Werk, 
dessen  Einsatzmöglichkei¬ 
ten  kaum  eingegrenzt  wer- 


PROZESSOR 

BUCH 


ZUM 


Technik  &  Programmierung 


EIN  DATA  BECKER  BUCH 


den  können.  Dieses  Buch  ist 
übrigens  auf  alle  Rechner 
mit  Z-80  CPU  anzuwenden 
und  gibt  Technik  und  Pro¬ 
grammierung  des  Z-80  in 
leicht  verständlicher  Form 
wieder. 


Brodie 

In  Forth  denken 
Carl  Hanser- Verlag  1986 
285  Seiten 
ISBN  3-446-14334-3 
Preis:  48,-  DM 

Die  Programmiersprache, 
bzw.  das  Betriebssystem 
FORTH  findet  heute  in  vie¬ 
len  Bereichen  seine  Anwen¬ 
dungen.  Der  Autor  versucht 
hier,  die  Grundzüge  von 
Forth  in  einfacher  Form 
darzustellen  und  dem  Ler¬ 
nenden  die  strukturierte  Pro¬ 
grammierung  nahezubrin¬ 
gen.  So  wird  ein  gewichtiger 
Teil  auf  die  Softwareentwick¬ 
lung  gelegt,  dieses  Kapitel 
dürfte  auf  nahezu  jede  Pro¬ 
grammiersprache  angewen¬ 
det  werden. 


itO  UKOOff 


Vorkenntnisse  sind  zwar 
nicht  unbedingt  notwendig, 
helfen  in  einigen  Kapiteln 
jedoch  über  mögliche  Ver¬ 
ständnisschwierigkeiten  hin¬ 
weg,  denn  das  Hauptaugen¬ 
merk  liegt  eindeutig  auf  dem 
Erlernen  eines  sicheren  und 
effektiven  Progra  m m  ierst i  ls 
in  Forth. 

Mit  diesem  Buch  liegt  wohl 
eines  der  interessantesten 
Forth-Arbeitsbücher  vor  und 
ist  für  Interessierte,  Fortge¬ 
schrittene  und  Profis  unein¬ 
geschränkt  zu  empfehlen. 


Borgersen 

Von  Basic  zu  Pascal 
Elektra  Verlag  1984 
138  Seiten 

ISBN  3-922238-61-0 
Preis:  34,-  DM 

In  letzter  Zeit  kristallisiert 
sich  die  Programmierspra¬ 
che  Pascal  immer  mehr  zu 
einem  Standard  für  Mikro¬ 
computer  heraus.  Zur  Zeit 
gibt  es  mehrere  Pascal-Ver¬ 
sionen;  u.a.  auch  das  soge¬ 
nannte  USCD-Pascal.  mit 
dem  sich  dieses  Buch  be¬ 
schäftigt.  Dem  Basie-Pro- 
grammierer  wird  hier  eine 
Einführung  in  Pascal  gege¬ 
ben;  die  großen  Unterschie¬ 
de  zu  Basic  werden  deutlich. 
Dieses  Buch  versteht  sich 
daher  auch  nicht  als  Pascal- 
Programmsammlung,  son¬ 
dern  als  Übergang  vom  Kau¬ 
derwelsch  Basic  zum  struk¬ 
turierten  Pascal.  Als  hilf¬ 
reich  erweist  sich  für  den 
Pascal-Laien  die  im  Anhang 
befindliche  Referenzliste,  die 
alle  wesentlichen  Schlüssel¬ 
wörter  vergleichend  darstellt. 
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Pas  Tor  xur  Welt 

öffnet  sich  für  alle  CPC-Besitzer  mit 
einem  von  der  Firma  SIKOS  ange¬ 
botenen  System  von  Peripheriekar¬ 
ten  auf  der  Basis  des  bekannten  ECB- 
Bussystems.  Die  Stärken  dieses  Bus¬ 
ses  wurden  in  der  SCHNEIDER- 
WARE-Serie  gelegentlich  erwähnt; 
die  größten  Vorteile  bestehen  in  der 
großen  Verbreitung  des  Systems  und 
der  Kompatibilität  zu  allen  Z-80- 
Rechnern. 

Die  von  o.g.  Hersteller  angebotenen 
Karten  zielen  in  Qualität  und  Anwen¬ 
dungsmöglichkeiten  deutlich  auf 
professionelle  Nutzung;  die  Preisge¬ 
staltung  der  Bausteine  ermöglicht 
aber  durchaus  dem  interessierten  Pri¬ 
vatmann  den  Einsatz  des  Systems  im 
trauten  Heim. 

1.  Die  Interfacekarte 

Sie  ist  Voraussetzung  für  den  Betrieb 
der  CPC’s  am  ECB-Bus;  hier  wird  die 
Pinbelegung  des  CPC-Expansionports 
auf  die  Pins  des  ECB-Bus  konvertiert; 
ebenso  findet  auf  dieser  Karte  die 
Bufferung  zum  Schutz  des  CPC- 
Ports  statt.  Diese  Karte  enthält  drei 
Steckplätze;  je  einen  für  das  Kabel 
zu.m  Anschluß  von  464/664  bzw.  6 128; 
der  dritte  erlaubt  die  Verbindung  mit 
allerlei  Peripherie  wie  Disk- Laufwer¬ 
ke  oder  Speichererweiterungen  (wich¬ 
tig  für  den  464).  Ein  besonderes  Merk¬ 
mal  dieses  Interfaces  ist  die  Möglich¬ 
keit,  den  Bus  in  den  Zweck-DMA- 
Betrieb  umzuschalten  oder  einen 
Sub-Prozessor  anzuschließen. 

Die  Optokoppler-Karte  stellt  32 
potential  freie  Optokoppler  zur  Ver¬ 
fügung,  die  für  Schaltanwendungen 
eingesetzt  werden  können,  die  eine 
galvanische  Trennung  von  Eingang 
und  Ausgang  erfordern.  Die  maxim  al 
mögliche  Eingangsspannung  beträgt 
30  V;  Signale  werden  ab  4  mA  ein¬ 


wandfrei  erkannt;  die  Stromauf¬ 
nahme  der  Karte  beträgt  nur  etwa  270 
mA  bei  5V.  Defekte  Optokoppler 
können  problemlos  einzeln  ausge¬ 
wechselt  werden;  im  Servicefall  ein 
großer  Vorteil. 

2.  Die  Relais-Karte 
Sie  enthält  16  potentialfreie  Relaisaus¬ 
gänge  (Öffner  und  Schließer);  die 
Kontakte  können  mit  Lötpillen  auf 
High  (5V)-  oder  Low  (GND)- 
Potential  verbunden  werden.  Die 
Schaltleistung  der  Relaiskontakte  be¬ 
trägt  maximal  24  W  bei  einer  maxi¬ 
malen  Schaltspannung  von  30  V 
Gleich-/150V  Wechselspannung  und 
einem  maximalen  Schaltstrom  von  1 A 
Die  Relaisadressen  sind  per  DIL- 
Schalter  einstellbar;  ein  RESET  setzt 
alle  Relais  in  Grundstellung  zurück. 
Durch  Ansprechen  einer  Portadresse 
können  alle  Relais  rückgesetzt  wer¬ 
den;  dies  entspricht  einer  software¬ 
mäßigen  Notaus-Funktion. 

Die  Wandlerkarte  beherbergt  in  der 
höchsten  Ausbaustufe  maximal  drei 
A/D-Wandler  und  einen  D/A- 
Wandler.  Die  A/D- Wandler  arbeiten 
mit  einer  Auflösung  von  acht  Bit;  die 
Wandlungszeit  beträgt  typ.  15  us,  im 
sample/hold-Betrieb  ist  eine  Redu¬ 
zierung  auf  4  us  möglich.  Der  D/A- 
Wandler  ermöglicht  die  Ausgabe 


analoger  Signale;  hier  beträgt  die 
Wandlungszeit  ca.  1  us. 

»Nach  Angaben  der  Fa.  SIKOS  wird 
demnächst  eine  weitere  A/D-Wand¬ 
lerkarte  für  den  ECB-Bus  angeboten, 
die  12  Bit  breite  Informationen  wan¬ 
delt  und  in  fast  allen  Funktionen 
softwareseitig  steuerbar  ist.  Diese 
Karte  ist  ein  Novum;  eine  separate 
Besprechung  wird  in  einer  der  näch¬ 
sten  Ausgaben  erfolgen. 

Die  Preise:  (ohne  MwSt) 

-  Interfaceplatine  leer  mit  Manual 
ca.  69,-  DM 

-  dto.  mit  Bauteilesatz  ca.  172,-  DM 

-  dto.  Fertiggerät  +  0,5  m  Kabel 
ca.  294,-  DM 

-  dto.  Industrieversion  ca.  383  -  DM 

-  Busplatine  mit  10  ECB-Slots, 
A-B-C-bestückt,  68000-fähig  Leer¬ 
platine  ca.  43,-  DM 

-  Fertiggerät  ca.  128,-  DM 

-  Relaiskarte  mit  Manual,  anschluß¬ 
fertig  ca.  299,-  DM 

-  Optokopplerkarte  mit  Manual, 
anschlußfertig  ca.  378,-  DM 

-  Wandlerkarte  mit  Manual, 
anschlußfertig,  Minimalstufe 

ca.  210,-/  Maximalstufe  ca.  430,-  DM 
Herstellung  und  Vertrieb: 

Fa.  SIKOS  data-application,8504  Stein 

(ME) 


Bild  2:  Die  Karten  am  CPC 
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JOYCE 

schon  ab  DM  1.799,-* 


Das  komplette  Schreibsystem: 
Computer,  Monitor, 

Drucker  und  Software. 

*  unverbindliche  Preisempfehlung,  inklusive  MwSt. 


gd  Schneider 


Der  Matrixdrucker  von  Schneider 
in  Korrespondenzqualität 
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LOCosOfipr  r»p  ■* .  _ 


Der  Joyce  von  Schneider. 

Und  ab  sofort  sieht  alles  ganz  anders  aus: 

Ein  neues  Schreibsystem,  das  mühelos  in  kürzester  Zeit 
Spitzen- Ergebnisse  liefert. 

Ein  neuer  Personal-Computer,  der  sich  wirklich  von  Jedermann 
ganz  einfach  bedienen  läßt  Ein  neues  Text-Programm,  das  endlich 
auf  die  Anforderungen  zugeschnitten  ist,  die  man  in  deutschen  Büros 
am  häufigsten  stellt. 

Die  Arbeit  ist  auf  einmal  viel  effizienter.  Und  macht  auch  noch  viel  mehr  Spaß. 
JOYCE  bringt  die  Wende. 

Obwohl  sein  Preis  eher  eine  Revolution  ist . . . 


Komplett  bedeutet  für  Sie: 
Auspacken,  aufbauen,  anfanqen. 


CPC/8 


Hardware1 


Hoffentlich  ist  Ihr  Lötkolben  vom 
Löten  der  Centronicschnittsteüe  noch 
heiß,  denn  heute  geht  es  sofort  weiter 
mit  der  Entwicklung  einer  universellen 
V/24-Schnittstelle.  Ganz  eiligen  Le¬ 
sern  möchte  ich  kurz  die  technischen 
Daten  bekanntgeben,  bevor  ich  die 
unvermeidliche  Theorie  einer  seriellen 
Datenübertragung  erarbeite: 

Baudrate  (Übertragungsgeschwindig¬ 
keit)  von  75  - 19600  Baud  per  Software 
einstellbar,  getrennt  für  Sender  und 
Empfänger,  die  Übertragungsparame¬ 
ter  per  RSX-Befehl  wählbar,  unabhän¬ 
giges  Ansprechen  von  2  Karten  durch 
entsprechende  Adressdecodierung,  Eu¬ 
ropakartenformat  mit  ECB-Anschluß- 
belegung  sowie  ein  passendes  Software¬ 
paket. 


Einzeln  ein-  und  aussteigen 


Wir  wollen  uns  noch  einmal  kurz  ins 
Gedächtnis  rufen,  wie  die  parallele 
Datenverarbeitung  funktionierte.  Die 
Information  liegt  am  8  BIT  Daten¬ 
port  zur  gleichen  Zeit  an.  Durch  ein 
sogenanntes  Übertragungssignal 
(STROBE)  übernimmt  dasjenige  Bau¬ 
teil  die  Daten,  für  das  sie  bestimmt 
waren.  Das  bedeutet,  es  werden  acht 
verschiedene  Informationen  (BITS) 
gleichzeitig  übertragen. 

Die  serielle  Verarbeitung  sieht  nun 


etwas  anders  aus.  Die  Daten  werden 
Bit  für  Bit  hintereinander  über  ein, 
einem  Schieberegister  ähnlichen,  Al¬ 
leskönner  ausgegeben.  Das  Prinzip 
können  Sie  aus  Bild  1  ersehen.  Ein 
großer  Vorteil  der  seriellen  Kommu¬ 
nikation  ist  der,  daß  zur  Realisierung 
nur  ein  Leitungspaar  erforderlich  ist. 

Denn  die  Bits  werden  ja  nicht  auf  8 
Leitungen  zur  gleichen  Zeit,  sondern 
auf  einer  Leitung  nacheinander 
übertragen.  Dabei  spielt  die  Übertra¬ 
gungsgeschwindigkeit.  man  nennt  sie 
BAUDRATE  (BITS  /  sec),  eine  ent- 
scheidene  Rolle.  Die  Datenbits  wer¬ 
den  nun  mit  einer  bestimmten  Ge¬ 
schwindigkeit  über  unser  Schiebere¬ 
gister  ausgegeben  (GESENDET). 

Die  Leitungen  enden  dann  natürlich 
bei  einem  Empfänger,  der  unsere  ge¬ 
sendeten  Daten  auch  wieder  empfan¬ 
gen  sollte.  Da  er  aber  aus  dem  unend¬ 
lichen  Strom  ankommender  Daten 
nicht  erkennen  kann,  wann  ein  Wort 
anfängt  oder  endet,  haben  sich  pfif¬ 
fige  Leute  eine  sehr  gute  Lösung  die¬ 
ses  Problems  ausgedacht.  Spätestens 
jetzt  wird  Ihnen  klar,  daß  man  zur  se¬ 
riellen  Übertragung  ein  besonderes 
”ÜBERTRAGUNGSFORMAT” 
verwenden  muß.  Der  Empfänger  soll 
ganz  klarerkennen  können,  wann  ein 
Datenwort  beginnt  und  wann  es  en¬ 
det.  Eine  solche  Aufgabe  kann  von 
einem  simplen  Schieberegister  nicht 


mehr  zufriedenstellend  erfüllt  wer¬ 
den. 


Hochtrabende  Namen 


Die  für  den  seriellen  Datenverkehr 
angebotenen  Bausteine  tragen  meist 
sehr  exotische  Namen.  Hier  eibt  es 
'USARTS',  'ACIAS'  und  ’UARTS  '. 
Diese  anspruchsvollen  Namen  erfül¬ 
len  gerade  den  Anfänger  mit  unge¬ 
heuerer  Ehrfurcht  und  tragen  meist 
auch  dazu  bei,  daß  er  lieber  seinen 
Platz  als  Hardwareprofi  anderen 
überläßt.  Dabei  sind  diese  Namen  in 
der  Regel  nur  die  Abkürzungen  der 
englischen  Bausteinbeschreibungen. 

Da  die  Funktionen  derartiger  IC’s 
sehr  ähnlich  sind,  wollen  wir  uns  nur 
dem  meistverwendeten  Baustein, 
dem  'USART’  8251  widmen.  US  ART 
heißt  nichts  anderes  als  'Universal 
'Synchron  A'synch  ron  'R'eciver 
(Empfänger)  'Transmitter;  welch  ein 
Satz.  Ich  habe  diesen  Baustein  aller¬ 
dings  nicht  wegen  seines  schönen 
Namens  ausgewählt,  sondern  wegen 
seiner  Leistungsfähigkeit  und  der  ein¬ 
fachen  Bedienung,  die  Ihnen  später 
sicher  zugute  kommen  wird. 


BIT  für  BIT 


Vom  Prinzip  ist  so  ein  'USART'  auf 
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inimmmi 


ihm 


niuiii 


der  Senderseite  ein  Parallel/Serieli- 
wandler  und  au  f  der  Empfängerseite 
ein  Seriell/Parallelwandler,  d.h.  er 
zerstückelt  die  vom  Microcomputer 
gelieferten  Daten  (8  BIT  WORT)  und 
gibt  sie  kleckerweise  aus.  Beim  Entge¬ 
gennehmen  der  seriell  ankommen- 
den  Daten  setzt  er  sie  umgekehrt 
zusammen  und  übergibt  sie  wieder 
als  8  Bit  Wort  dem  Prozessor.  Nun  ist 
es  sehr  nützlich  zu  wissen,  wann  ein 
Datenwort  zu  Ende  ist  und  wann  ein 
neues  anfängt;  andernfalls  gibt  es 
unweigerlich  Bitsalat.  Für  das  'PRO¬ 
TOKOLL’  sind  bestimmte  Vereinba¬ 
rungen  getroffen  worden.  Die  Sende- 
und  Empfangsleitungen  befinden 
sich  in  Ruhe  immer  in  einer  Markie¬ 
rungsstellung  (MARK).  das  bedeutet, 
sie  führen  HIGH-Pegel.  Nun  quetscht 
man  (bzw.  der  8251  tut  das  von  sich 
aus)  vor  das  Datenwort  ein  zusätzli¬ 
ches  Bit,  welches  immer  LOW-Pegel 
führt.  Dieses  BIT  nennt  man  'START- 
BIT.  An  der  abfallenden  Flanke  die¬ 
ses  Startbits  erkennt  der  Baustein  den 
Beginn  des  Datenwortes  und  beginnt, 
die  nachfolgenden  Bits  zu  zählen. 

Nach  dem  7-ten  oder  8-ten  Bit  (je 
nach  Programmierung  des  8251)  fügt 
der  8251  noch  ein  sogenanntes 
Stopbit  an.  Der  Pegel  dieses  Bits  ent¬ 
spricht  wieder  dem  Zustand  MARK 
(HIGH).  Der  Baustein  hat  noch  die 
Möglichkeit,  die  Anzahl  der  Stopbits 
festzulegen;  1,  1.  5  oder  2  sind  mög¬ 
lich.  Mit  diesem  Wissen  können  Sie 
schon  beginnen,  vorausgesetzt,  die 
entsprechende  Hardware  ist  vorhan¬ 
den,  um  Daten  auf  die  lange  Reise  zu 
schicken.  Technisch  funktioniert  das 
einwandfrei.  In  Bild  2  sehen  Sie  die 
schematische  Darstellung  eines  Da¬ 
tenwortes  mit  Start  und  Stopbits.  Bei 
Übertragungen,  die  eine  hohe  Daten- 
sicherheit  verlangen,  besitzt  der  8251 
eine  Einrichtung,  die  es  dem  Pro¬ 
grammierer  ermöglicht,  eine  Prü¬ 
fung  der  ankommenden  Daten  vor¬ 
zunehmen.  Diese  nützliche  Austat- 
tung  heißt  ’PARITYPRÜFUNG'. 
Dieses  Testverfahren  verwendet  ein 
internes  Bit,  genannt  'PARITYBIT. 
Dieses  Verfahren  kann  allerdings  nur 
einen  aufgetretenen  Fehler  erkennen, 
ihn  aber  nicht  richtigstellen.  Die  Pa- 
rityprüfung  funktioniert  also  folgen¬ 
dermaßen: 

Der  8251  zählt  nun  während  der 
Übertragung  die  Anzahl  der  binären 
Einsen,  die  in  einem  Datenwort  vor¬ 
handen  sind.  In  Abhängigkeit  von 
dieser  ermittelten  Zahl  setzt  der  Usart 
ein  Bit  auf  HIGH  und  fügt  es  nach 
dem  Datenwort  in  den  Bitstrom  ein. 
Der  Empfänger  zählt  nun  wieder  die 


Bild  1:  Schema  serielle  und  parallele 
Übertragung 

ZU  UÖfRTRAOcNDES 
UATENWORT 


Einsen  und  erzeugt  das  Paritybit,  ver¬ 
gleicht  es  mit  dem  Mitgeschickten 
und  setzt  ein  entsprechendes  Bit  in 
einem  Register  (Speicherzelle),  ent¬ 
sprechend  dem  Ergebnis.  Ebenso 
kann  der  8251  sogenannte  ’F RA¬ 
MING  ERRORS’  (Rahmenfehler, 
kein  Stopbit  vorhanden)  oder  soge¬ 
nannte  'OVERRUN  ERRORS'  (Über¬ 
lauffehler,  entsteht  dann,  wenn  ein 
Zeichen  empfangen  wurde,  das  frü¬ 
here  von  der  CPU  noch  nicht  abge¬ 
holt  wurde,  also  verlorenging),  erken¬ 
nen  und  sie  dem  Programm  mittels 
dieses  Registers  mitteilen.  Dieser 
Möglichkeiten  werden  wir  uns  nicht 
bedienen,  da  unsere  Daten  nicht  von 
so  wichtiger  Natur  sind,  um  derart 
überwacht  zu  werden. 


D  7  Dt  05  D4  03  02  0  1  00 
0  10  10  0  11 


Unser  USART  wird  aktiv 


Da  der  8251  aufgrund  grauer  Theorie 
nicht  zu  arbeiten  beginnen  kann,  müs¬ 
sen  wir  endlich  aktiv  werden. 

Wie  Sie  im  letzten  Beitrag  gelesen  ha¬ 
ben,  übergibt  man  diesen  hochkaräti¬ 
gen  Schaltkreisen  ihre  Arbeitsvorga¬ 
ben  mittels  Steuerwörtern  in  bestimm¬ 
ten  Registern.  Der  8251  hat  deren  2.  In 
diesen  Bytes,  es  können  durchaus 
mehrere  sein,  teilt  man  dem  Baustein 
mit.  was  er  in  Zukunft  zu  tun  hat.  Nach 
dem  Einschalten  der  Versorgungs¬ 
spannung  von  5  Volt,  wie  sie  für  TTL- 
Bausteine  zwingend  vorgeschrieben 
ist,  befindet  sich  der  8251  in  einem  Un¬ 
definierten  ’Wartezustand'.  Der  Bau¬ 
stein  825.1  besitzt  zwei  Register  (Spei¬ 
cherzellen),  ein  Register  für  die  Steuer¬ 
wörter  und  eins  zum  Abspeichern  der 
gesendeten  und  empfangenen  Bytes. 
Nachdem  das  Steuerregister  an  der 
Adresse  &F9E1  nach  dem  Einschalten 
einen  zufälligen  Wert  annimmt,  weiß 
der  Baustein  nicht  was  er  zu  tun  hat. 
(Deswegen  übergeben  wir  ihm  erst  ein¬ 
mal  drei  'Nullbytes’  in  Form  folgender 
Befehle:  OUT  &F9E  1 ,0:OUT  &F9E  1 ,0: 
OUT  &F9El,0:und  befehlen  ihm,  erst 
einmal  nichts'  zu  tun.  Auf  jeden  Fall 
hat  er  die  Anzahl  der  Bytes,  die  wir  ihm 
übergaben,  mitgezählt  Jetzt  wird  ein 
Befehlsbyte  erwartet  und  dieses  über¬ 
geben  wir  ihm  wieder  in  Form  eines 
Out  &F9E1,&40.  Dadurch  wird  der 
8251  intern  in  einen  definierten 
Zustand  versetzt  und  wir  können  zu  ar¬ 
beiten  beginnen.  Nach  einem  'INTER¬ 
NEN  RESET’,  wie  dieser  Befehl  heißt 
interpretiert  der  Chip  das  nächstfol- 
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gende  Byte  als  'MODUSWORT'.  Da  er 
aber  nur  2  Register  zur  Verfügung  hat 
und  zum  SENDEN  und  EMPFAN¬ 
GEN  schon  eines  benötigt  bleibt  uns 
nichts  anderes  übrig,  als  das  Modus- 
wort  und  das  Befehlswort  nacheinan¬ 
der  zu  übergeben.  Der  8251  erwartet 
während  der  Initialisierungsphase 
zuerst  das  Moduswort  (Leitung  C/D 
auf  HIGH).  Das  Byte,  das  unmittelbar 
auf  dieses  Moduswort  folgt  wird  als 
Befehlswort  interpretiert  Mit  dem 
Moduswort  legen  wir  die  Anzahl  der 
Datenbits,  der  Stopbits,  den  Modus  der 
Parityprüfung  und  den  Baudraten¬ 
faktor,  der  die  Werte  1,16  und  64  an¬ 
nehmen  kann,  fest.  Dieser  Faktor  teilt 
die  Frequenz,  die  an  den  Pins  RxC  und 
TxC  durch  eben  diese  drei  Werte.  Mit 
Hilfe  des  Befehlswortes,  das  innerhalb 
eines  Programms  auch  mehrmals  ge¬ 
ändertwerden  kann,  gibt  man  den  Sen¬ 
der  und  den  Empfänger  frei  oder  sperrt 
ihn.  Ebenso  kann  man  bestimmte  Pins 
des  8251  entsprechend  setzen  (HIGH) 
oder  löschen  (LOW),  wie  es  der 
Programmablauf  gerade  erfordert. 
Auch  wird  der  interne  Reset  (BIT  7  auf 
HIGH)  eingeleitet  Bit  4  setzt  die  Mel¬ 
dungen  der  Fehler  zurück  (Parity, 
Frame  und  Overrun).  Die  Tabellen  la 
bis  c  geben  Ihnen  eine  Übersicht  der 
Program mierungsmöglich keiten.  Nun 
ist  es  langsam  an  der  Zeit  den  Baustein 
mit  unserem  Microprozessor  zu  ver¬ 
binden. 


Der  Z  80  steuert  einen 
USART 


Da  Sie  mittlerweile  zu  ausgefuchsten 
Hardwareprofis  heranreifen,  möchte 
ich  Sie  mit  den  alten  Kamellen  der 
Adressdecodierung  nicht  mehr  lang¬ 
weilen,  sondern  gleich  richtig  einstei¬ 
gen.  Aus  dem  Schaltplan,  den  Sie  in 
Skizze Ibewundern  können,  sind  Sie 
sicher  in  der  Lage,  die  Adressdecodie¬ 
rung  gemäß  Schneiderware  #  1,  nach¬ 
zuvollziehen.  Sie  finden  die  entspre¬ 
chenden  Portadressen  in  Tabelle  2. 
Viel  interessanter  für  uns  sind  jetzt 
die  Anschlüsse  des  8251,  die  ihn  zum 
Leben  erwecken.  Bild  3  macht  Sie  mit 
deren  Anschlußbelegung  vertraut. 
Anschlüsse,  deren  Namen  wir  schon 

Bild  2:  Darstellung  eines  seriellen 
Datenwortes 


00  Dl  02  0  3  D<*  05  06  D7 
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Tab.  1:  Moduswort  8251 


D7D6  D5D4  D3  D2  Dl  DO 


02  -  HO  NEHH EN  DEN  GLEICHEN  LOGISCHEN 
JU5HNC  AN.  NIE  DIE  ENTSPRECHENDEN 
ANSCHLÜSSE  DES  8251: 

02  -  Inf  J  Dl  *  8«#D»  |  DO  -  l>SDf 


ÜAHIIMSFtfire 


"NE  FEHLE» 

S  »UROf  Er»  FEHLEN.  BEI  EINEN 
NPFANGENEN  ZEICHEN  ERKANNT 
S  KANN  K|T  DEN  BIT  D  R  DES  K CHHANOO' 
TEUENKOBTES  ZURÜCK SESLT ET  HERDEN. 


mSU'JFKHl^ 

L  =  OHNE  FEHLER 

H  ■  DEN  INHALT  DES  PUFFERS  HLRQE  jSER- 
SCHBIEBEN,  5EY0R  DER  RECHNE«  OIE 
ZEICHEN  AUSLfi  SEN  KONNTE. 


UUJ1UD 
OHNE  FEHLER 

**  ENDE  EINES  DATEHHORTES  KONNTE  KEIN 
STOPPBIT  ERKANNT  NEHDEN.  OIESCR  FEHLER 
IST  NOR  |H  ASYNCHRONEN  BETRIEB  «»GLICH. 

IHlCRKENNUNG  ELRUCK 


DÜ  SETZT 


OIE  BITS  D?  UNO  D6  GEBEN  DEN  JENE IL IGEN  PEGEL 

DES  8251  nISI-R 


Befehlswort  8251 

fHTUCHBPH 


Kontrollwort  8251 


Tab.  1:  Steuerwort  8253 


07 


D6 

D5  D4 

D3 

D2 

Dl 

DO 

I 


| - 

-  t  n 

■M;  zniflU-iUüLü 

L  :  NORMALER  üiTRICB 

H  *  Ausgang  txo  wird  au 
GESETZT,  NOR.HALPALL 


rLHL£RK£HWmifi 


FEHL ERKE  NNUN6EN  WE  RDEN.  ZUftLltlK- 
TZr;  PAUJTATS-,  ÜBERLAUF-.  ZEICHlA 
£R  IK  SltUERWORI  ZUSTANDSE I NLESORß 


iiAilLAifiifiilLiaJli 

H  *  JIM  NT»‘AUfc«AIIS  *IR|| 


’ 

H  -  IO**A*DO  IST  »*lpUSVGRT  •  ■ 

DiMbuna  cic  *  ! 

N 

NUR  BEI  5T  NCH.ÄüN  Es  AR  9E  TTSW  E  1  SEj  EPMCGLIC 
NACH  Df  H  SYNCHROMlSATlüNSZeiCHf H 

I  SUCHE 

Codiermöglichkeiten  der  V/24  -  Karte  Tab.  2:  Portadressen  der  V/24 

F9E0  1111100111100000 
F9E1  1111100111100001 
F9E2  1111100111100010 
F9E3  1111100111100011 
F9E4  1111100111100100 
F9E5  1111100111100101 
F9E6  1111100111100110 
F9E7  1111100111100111 

Daten  Karte  1 

Steuerwort  Karte  1 

vor ein- 
gestellt 

J7-7 

00 

Daten  Karte  2 

Steuerwort  Karte  2 

Brücke 

trennen 

J8-8 

Ql 

frei 

frei 

J9-9 

32 _ 

JlO-10 

Q3 

F9E8  1111100111101000 

F9E9  1111100111101001 
F9EA  1111100111101010 
F9EB  1111100111101011 
F9EC  111110011110110 
F9ED  1111100111101101 
F9EE  1111100111101110 
F9EF  1111100111101111 

Timer  0 

Timer  1 

Karte  2 

Karte  2 

Q4+Q5 

stecken 

Q6+Q7 

trennen 

Jll-11 

Timer  2 

Steurwört 

Karte  2 
Karte  2 

J12-12 

05 

Timer  0 

Timer  1 

Karte  1 
Karte  1 

vorein¬ 

gestellt 

J13-13 

06 

Timer  2 

Steuerwort 

Karte  1 
Karte  1 

J14-14 

Q7 

Einstellung  der  Vorteilerfrequenz:  2  MHz  voreingestellt  31-1 

1  MHz  J2-2 

kennen  (D0-D7,RD,WR.und  CS),  ha¬ 
ben  bei  diesem  Baustein  die  gleiche 
Funktion  wie  z.B  beim  8255  aus  dem 
letzten  Beitrag.  Da  ich  nicht  alle  Bcin- 
chen  dieses  vielseitigen  'Käfers*  be¬ 
sprechen  kann  (würde  allein  ein  gan¬ 
zes  Heft  füllen),  möchte  ich  mich  auf 
die  Pins  beschränken,  die  für  uns 
wichtig  sind.  Da  sind  die  Anschlüsse 
'RxD'  und  TxD\ 

Über  diese  beiden  Leitungen  werden 
die  Daten  gesendet  (TxD  Transmit 
Data)  und  empfangen  (RxD  Receive 
Data).  Eine  weitere  wichtige  Leitung 
ist  der  Pin  17  des  8251  (CTS  Clear  to 
Send  -  Klar  zum  Senden).  Die 
deutsche  Übersetzung  sagt  eigentlich 
schon  alles  über  deren  Bedeutung 
aus.  Sie  wird  vom  Baustein  ähnlich 
verwendet,  wie  die  Leitung  BUSY,  die 
uns  von  der  Centronics  schon  be¬ 
kannt  ist.  Wenn  dieses  Signal  auf 
LOW  ist.  dann  kann  der  Baustein 
senden,  vorausgesetzt,  der  Sender 
wurde  mittels  Befehlsbyte  (bit  0  auf  1) 
enabled  (freigeschaltet).  Auch  ein  se¬ 
rieller  Drucker  verwendet  dieses  Sig¬ 
nal,  um  den  sogenannten  Handshake 
(Händesehütteln)-betrieb  zu  ermög¬ 
lichen.  Ferner  gibt  es  noch  eine  Reihe 
anderer  Pins,  deren  Zustände  über 
das  Controllwort  (print(inp(&f9el))) 
abgefragt  werden  können.  Für  unsere 
Software  sind  allerdings  nur  die  Bits 
TxRDY  (Sendebuffer  leer=l)  und 
RxRDY  (Empfangsbuffer  voll=l) 
von  Bedeutung.  Diese  Abfrage  benö¬ 
tigen  wir  später  in  unserem  An¬ 
steuerprogramm.  Nun  bleiben  noch 
drei  Pins  (clock-20,RxC-25  und  TxC- 
9).  Pin  20  Clock  wird  einfach  mit  dem 
Prozessortakt  verbunden  (4M HZ). 
Die  beiden  anderen  möchte  ich  erst 
etwas  später  besprechen. 
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Tab.  3:  Baudratentabelle 


TEILUNGSFAKTOR  3253 


SFREQUENZ 

L  TIMERWERT 

FREQUENZ  KHZ 

1 

16 

64 

.  <  6 

)  2 

MHZ  (  13  ) 

153,6 

KHZ 

_ 

9200 

2400 

<  13 

) 

(  26  ) 

76,3 

KHZ 

- 

4800 

1200 

<  26 

) 

<  52  ) 

38 . 4 

KH2 

- 

2400 

600 

<  52 

) 

<104  ) 

19,2 

KHZ 

19200 

1200 

300 

(  104 

) 

<208  ) 

9,6 

KHZ 

9600 

600 

150 

(  208 

) 

<416  ) 

4,8 

KHZ 

4800 

300 

75 

<416 

) 

<  833  > 

2, 4 

KHZ 

2400 

150 

37 

(  B33 

) 

(1666  ) 

1 , 2 

KHZ 

1200 

75 

- 

<  1666 

) 

<3333  ) 

0.6 

KHZ 

600 

37,5 

- 

1  MH  2  < 


ZWISCHENWERTE  KOENNEN  JEDERZEIT  DURCH  VERSENDERN  DER  ZEITKONSTAN¬ 
TEN  ERZEUGT  WERDEN. 


Mit  der  Zeit  im  Clinch 


In  sehr  vielen  Anwendungsfällen 
ist  ein  Microcomputer  nur  damit 
beschäftigt,  seine  Zeit  damit  zu  ver¬ 
schwenden,  auf  das  eine  oder  andere 
Ereignis  eine  bestimmte  Zeit  zu  war¬ 
ten.  Dabei  gibt  es  eine  Reihe  unter¬ 
stützender  Bausteine,  die  unserem 
Microprozessor  solche  Nebentä¬ 
tigkeiten  abnehmen  können.  Diese 
Zeitgeber  oder  Timer  sind  geradezu 
prädestiniert,  der  CPU  bei  solchen 
Arbeiten  kräftig  unter  die  Arme  zu 
greifen.  Ein  typischer  Vertreter  aus 
der  Familie  der  Timer  ist  der  8253  von 
INTEL.  Dieser  Ic  besitzt  drei  unab¬ 
hängig  voneinander  arbeitende 
Rückwärtszähler,  deren  ausgangs¬ 
seitiges  Verhalten  sehr  vielseitig 
programmiert  werden  kann.  Jeder 
Zähler  (Timer)  besitzt  einen  eigenen 
Takteingang  (CLOCK),  der  mit 
einem  dazugehörigen  Freigabein¬ 
gang  (GATE)  UND  verknüpft  ist.  d.h. 
Taktimpulse  bewirken  nur  dann  ein 
Zählen,  wenn  der  GATEeingang  auf 
HIGH-Pegel  ist.  Die  Zählmethode 
(BINÄR  oder  BCD),  sowie  das  Ver¬ 
halten  der  Ausgänge  kann  für  jeden 
Zähler  separat  mittels  Steuerwort 
programmiert  werden.  Um  nun  den 
Timer  zum  Arbeiten  anzuregen, 
übergeben  wir  ihm  an  den  Adressen 
&F9EF  ein  Steuerwort  und  laden  nun 
an  den  Datenadressen  der  jeweiligen 
Zähler  (&F9EC-&F9EE)  die  Werte, 
bei  denen  sie  beginnen  sollen  zu  zäh¬ 
len.  Sie  werden  sich  fragen,  was  das 
eigentlich  soll:  Weiter  oben  machte 
ich  Sie  mit  den  Signalen  RxC  und 
TxC'  bekannt;  an  dieser  Stelle  be¬ 


leuchten  wir  sie  näher.  Der  Eingang 
RxC  ist  die  Frequenz,  die  die  Emp¬ 
fangsgeschwindigkeit  einstellt,  ana¬ 
log  dazu  legt  der  EingangTxC  die  Ge¬ 
schwindigkeit  beim  Senden  des  Bau¬ 
steins  fest.  Wir  möchten  nun  mittels 
Timer  diese  Baudraten  (Frequenzen) 
beliebig  verändern,  und  das  natür¬ 
lich  per  Software. 


Wohldosierte  Bits 


Der  Einsatz  eines  Zeitgeberbausteins 
reicht  vom  programmierbaren  Recht¬ 
eckgenerator  bis  hin  zum  Langzeitti- 
mer,  der  Signale  erzeugen  kann,  die 
sich  nur  alle  paar  Jahre  wiederholen. 
So  lange  wollen  wir  aber  nicht  auf 
unseren  seriellen  Datenstrom  warten. 

Da  unsere  Bits  einzeln  und  nachein¬ 
ander  auf  die  Reise  gehen,  benötigen 
W'ir  einen  Taktgeber,  der  die  Bits 
schrittweise  an  die  Ausgänge  durch¬ 
schiebt.  Die  Geschwindigkeit,  mit  der 
das  Ganze  geschieht,  nennt  man  wie 
sie  schon  wissen  'BAUDRATE';  das 
ist  die  Anzahl  der  Bits,  die  in  einer  Se¬ 


kunde  übertragen  werden.  Bei  unse¬ 
rer  Baudrate  von  300  Baud  werden 
sich  in  einer  Sekunde  300  Bits  durch 
den  Draht  quälen  müssen.  Das  ist 
schon  eine  beachtliche  Leistung.  Als 
weit  verbreitete  Baudrate  sind  9600 
Baud  in  großen  Systemen  eine 
durchaus  übliche  Geschwindigkeit. 
Unsere  Schnittstelle  kann  dank 
Timern  ebenfalls  höhere  Geschwin¬ 
digkeiten  erreichen  (z.B.  Ansteuern 
eines  seriellen  Druckers  mit  1200 
baud)  ist  durchaus  möglich.  Eine  Be¬ 
sonderheit  weist  diese  V/24-Schnitt- 
stclle  auf:  Durch  die  Möglichkeit,  die 
Geschwindigkeit  für  Senden  und 
Empfangen  getrennt  einzustellen, 
steht  Ihnen  mit  einem  geeigneten 
Akustikkoppler  die  Welt  des  BTX 
offen.  Diese  Übertragungsart  sendet 
mit  1200  Baud  und  empfängt  auf  dem 
Rückkanal  mit  einer  Baudrate  von  75 
Baud  -  für  uns  kein  Problem. 

Um  die  entsprechenden  Startwerte  in 
den  Timer  zu  bekommen,  ist  etwas 
Mathematik  nötig.  Wie  oben  schon 
erwähnt,  zählt  der  Timer  rückwärts, 
d.h.  er  subtrahiert  ausgehend  von 
einem  Anfangswert  immer  1  bei  je- 


Bild  3:  Anschlußbild  8251/8253 


5  MODE  0: PRIKT  CHR*(24)”V  /  24  TESTER  C3099] 
" CHR*  <24> 

6  PRINT:  PRINT:  PRINT;  PRINT:  PRINT  ”<C>  RICH  [89163 
TER  PETER  PRIKT: PRIKT: PRIKT: PRIKT: PRIKT 

CHR* < 24) "PARAMETER  SIKD  FEST  E I KGESTELLT" C 
HR* (24) 

7  PRIKT: PRIKT: PRINT  CHR*<24>”300  BAUD, 8  BI  C57203 
TS, KO  PARITY  "  CHR* ( 24 ) : LQCATE  1,25: PRINT 

"TASTE  DRUECKEK  " : CALL  &BB18: MODE  2 

10  CLS: INPUT  "DRUCKER  EIN  <1>  ODER  AUS  <0>  C34423 
" , DRUCKER 

11  IF  DRUCKER  =1  THEN  DRUCKER  =-l  ELSE  DRU  [14053 
CKER  *0 

50  KODE  2  [5133 

100  IF  PEEK<&9000)=0  THEN  MEMORY  &5FFF: LOA  [60913 
D" mail, bin",  &9000: GOTO  200 

200  CALL  &9000:  ! BAUD, 416, 416:  ! SIOINIT, 8,  0,  [20703 


2,  0 

500  DEFIKT  a  [3573 

510  CLS  [911 

1000  ein=-l:aus=0  [6533 

1010  a*= INKEY*: IF  a*<>”"  THEN  GOSUB  1050  [25953 

1020  a=0: ! RECV, ©a: IF  a<>0  THEN  GOSUB  1090  [35843 

1030  GOTO  1010  [3453 

1050  IF  a*=CHR*<12>  THEN  CLS: RETURN  [18273 

1060  ! SEND , ASC  < a* )  [1315] 

1080  RETURN  [5553 

1090  PRINT  CHR*<a>:  [12003 

1100  IF  drucker=EIK  THEN  ! PRINT, a  [9453 

1110  RETURN  (5553 
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dem  Taktimpuls  des  Clockeingangs. 
In  dem  Augenblick,  da  der  Zähler  0 
beinhaltet,  gibt  er  einen  Impuls  am 
Ausgang  ab,  der  die  Länge  einer 
Taktperiode  des  Clocksignals  besitzt. 
Skizze  4  zeigt  Ihnen  diesen  Zusam¬ 
menhang,  der  für  den  Modus  2 
zutrifft.  Da  dieses  Signal  einen 
unsymmetrischen  Charakter  besitzt 
(High  Zustand  dauert  länger  als 
LOW),  benutzen  wir  für  unsere  An¬ 
wendungen  den  MODE  3.  Hier  ist 
das  Ausgangssignal  genau  symmetri¬ 
sch  (HIGH  und  LOW  zu  gleichen 
Teilen).  Den  Zählerwert,  den  Sie  nun 
programmieren  müssen,  um  eine  ge¬ 
wünschte  Ausgangsfrequenz  zu  be¬ 
kommen,  errechnen  sie  nach  folgen¬ 
der  Formel:  Periodendauer  =  1/ 
Frequenz. 

Ein  Beispiel:  Für  eine  Baudrate  von 
300  Baud  benötigen  Sie  eine  Fre¬ 
quenz  (Tabelle  3)  bei  einem  Teilungs¬ 
faktor  (des  8251)  vnn  16  entspricht 
dies  einer  Frequenz  von  4.8  KHz. 
Eine  kurze  Rechnung  mit  dem  Ta¬ 
schenrechner  bestätigt  uns  den  Wert 
von  t  =  1  /4800  =  208  us.  Diesen  Wert 
müssen  Sie  dem  Befehl  Ibaud,  208, 
208  zweimal  übergeben,  einmal  für 
die  Empfangsrichtung,  und  einmal 
für  die  Senderichtung.  Dabei  ist  die 
Brücke  J2  gesteckt,  das  bedeutet  eine 
Eingangsfrequenz  von  1MHz.  In  der 


Stellung  J1  besitzt  die  Eingangsfre¬ 
quenz  den  doppelten  Wert  (immer 
nur  eine  Brücke  stecken!).  Mit  dieser 
Frequenz  hat  der  Zähler  im  Timer 
schon  in  der  Hälfte  der  Zeit  den  Null¬ 
durchgang  erreicht  und  gibt  den  ge¬ 
wünschten  Impuls  ab.  Um  in  diesem 
Fall  das  gewünschte  Ergebnis  zu  er¬ 
halten,  nehmen  wir  den  Wert  208  ein¬ 
fach  mal  2  und  veranlassen  den  Zäh¬ 
ler,  doppelt  lange  zu  zählen.  Der  Ein¬ 
gangstakt  wird  einfach  aus  dem 
Prozessortakt  am  Pin  29c  des  Karten¬ 
steckers  entnommen  und  dann  mit 
einem  Teiler  durch  2  geteilt.  Dieser 
Teiler  besteht  aus  zwei  hintereinan¬ 
dergeschalteten  D-Flipflops  vom  Typ 
74LS74.  Dieser  IC  erspart  uns  einen 
teuren  Quarzgenerator. 


Die  Hardware  ist  des  Ganzen 
Anfang 

Nachdem  wir  uns  nun  ausführlich 
mit  den  wichtigsten  Bausteinen  unse¬ 
rer  V/24-Schnittstelle  beschäftigt  ha¬ 
ben,  schreiten  wir  zum  Aufbau  der 
Platine.  Entweder  Sie  haben  sich  die 
Platine  selbst  hergestellt  oder  von  der 
Möglichkeit  unseres  Platinenservice 
Gebrauch  gemacht.  In  beiden  Fällen 
sollten  Sie  zuerst  die  nötigen  Brücken 
einlöten.  Die  Ic’s  gehören  in  gute  Fas¬ 


sungen.  Den  Widerstand  und  die 
Kondensatoren  (auf  richtige  Polung 
bei  den  Elektrolyttypen  achten)  kom¬ 
men  als  nächstes  dran. 

Nach  dem  Einlöten  der  Bauteile 
stecken  Sie  die  Karte  OHNE  ICS  erst¬ 
malig  an  Ihren  CPC.  Sollten  nach 
dem  Einschalten  kleine  Rauchwölk¬ 
chen  aufsteigen,  würde  ich  eine  noch¬ 
malige  Kontrolle  Ihrer  Arbeit  emp¬ 
fehlen  (kleine  Perlen,  die  evtl.  Leiter¬ 
bahnen  kurzschließen).  Wenn  aller¬ 
dings  das  gewohnte  'READY'  auf 
dem  Monitor  Ihres  CPC's  erstrahlt, 
können  Sie  getrost  die  restlichen  Bau¬ 
teile  in  ihre  Fassungen  stecken,  bei 
ausgeschalteter  Spannung  versieht 
sich,  und  die  gleiche  Prüfung  wieder¬ 
holen.  Die  zahlreichen  Einstellmög¬ 
lichkeiten  an  Ihrer  Karte  wurden 
schon  bei  der  Erstellung  des  Layouts 
berücksichtigt  und  auf  Standard¬ 
werte  voreingestellt.  Darum  brau¬ 
chen  Sie  sich  nicht  mehr  zu  küm¬ 
mern.  Wenn  Sie  Ihre  Karte  allerdings 
universell  verwenden  möchten,  emp¬ 
fehle  ich  Ihnen  sogenannte  Steck¬ 
brücken  einzulöten.  In  diesem  Fall 
müssen  Sie  auf  derUnterseite  der  Pla¬ 
tine  die  voreingestellten  Brücken  auf- 
trennen  und  sie  durch  Ihre  Einstel¬ 
lung  ersetzen.  Das  dürfte  aber  mit 
Hilfe  des  Schaltplanes  keine  Schwie¬ 
rigkeiten  bereiten. 
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Die  SCHNEIDERWARE  ist  ein 
universelles  Erweiterungssystem 
für  alle  CPC’s  auf  der  Basis  des 
bekannten  ECB- Bussystems. 
Dieses  System  läßt  sich  mit  mi¬ 
nimalen  Adaptionsmaßnahmen 
an  alle  Rechner  mit  Z80-CPU 
anschließen.  Für  Ihren  CPC 
brauchen  Sie  zunächst: 


Platinenservice 


Kabel  und 
Basisplatine 

Ein  50-poliges  Kabel  mit  den  passen¬ 
den  Steckern  für  Ihren  CPC  und  die 
Basisplatine  mit  Steckplätzen  für 
max.  5  Erweiterungskarten  stellen 
den  Grundstock  für  Ihre  Hardware- 
Erweiterungen  dar.  Die  Basisplatine 
adaptiert  den  Erweiterungsport  auf 
die  Anschlußbelegung  des  weitverbrei¬ 
teten  ECB-Bussystems. 


Die  Preise: 

Kabel  für  464/664  35,90 

Kabel  für  6128  45,90 

Platine,  unbestückt  24,90 

Karte,  geprüft  62,90 


1.  Das  passende  Kabel  (im  Ar¬ 
tikel  beschrieben;  wird  im 
Platinenservice  angeboten) 

2  Die  Basisplatine  (zur  Umset¬ 
zung  der  Pinbelegung  CPC/ 
ECB). 

Im  Lauf  der  Serie  wird  für  Ein¬ 
steiger  der  Aufbau  eines  19"- 
Systems  und  die  Integration  der 
Karten  in  dieses  Gehäuse  be¬ 
schrieben.  Die  Basisplatine  be¬ 
steht  aus  beidseitig  kupferbe¬ 
schichtetem  glasfaserverstärktem 
Epoxydharz  und  ist  durchkon¬ 
taktiert.  Die  Einsteckkarten  sind 
einseitig  beschichtet  und  aus 
dem  gleichen  Material  wie  die 
Basisplatine.  Die  in  den  Fertig¬ 
geräten  verwendeten  Bausteine 
sind  von  bester  Qualität;  die 
fertigen  Geräte  sind  geprüft.  Die 
in  Heft  7  vorgestellte  Centronics- 
Parallelschnittstelle  ist  gegen¬ 
über  dem  CPC-Druckerport  voll¬ 
ständig  und  vollkompatibel  zu 
allen  Geräten  mit  Centronics- 
Anschluß. 

Zahlungsbedingungen: 


Centronics 

Diese  Karte  ist  eine  vollwertige  8-Bit- 
Parallelschnittstelle  nach  Centronics- 
Standard.  Jegliche  kommerzielle  Peri¬ 
pherie  arbeitet  problemlos  mit  dieser 
Karte  zusammen  Die  Software  zu  dieser 
Schnittstelle  ist  in  Heit  7/86  ab¬ 
gedruckt  Die  Karte  kann  direkt  in  ein 
ECB-Bussystem  eingesteckt  werden 
und  ist  mit  angepaßter  Software  auf  al¬ 
len  Z80-Rechnern  lauftähig 

Die  Preise: 

Platine,  unbestückt  17,90 

Karte,  geprüft  79,90 


V/24 

SCHN  El  DERWARE  #3  präsentiert  eine 
komplette  V/24  (RS  232)-Schnittstelle. 
Auch  diese  Karte  ist,  wie  sämtliche 
Peripherie  aus  dieser  Serie,  voll  kompa¬ 
tibel  zu  kommerziellen  Geräten  mit  RS 
232-Schnittstelle.  Die  Steuerbefehle  sind 
als  RSX- Befehle  gestaltet  und  können 
problemlos  in  eigene  Basicprogramme 
eingebunden  werden  Die  Bauanleitung 
und  die  Software  dieser  universellen 
Schnittstelle  ist  in  CPC  Schneider  Inter¬ 
national,  Heft  8/86  abgedruckt 

Die  Preise: 

Platine,  unbestückt  29,80  OM 

Karte,  geprüft  139,90  DM 


Gesamtpreis  zuzüglich  5,-  DM 
Porto/Verpackung  (im  Ausland 
8,-  DM  Porto/Verpackung) 

Am  einfachsten  per  Vorkasse 
(Verrechnungsscheck)  oder  als 
Nachnahme  zuzügl.  der  Nach¬ 
nahmegebühr  (in  das  Ausland 
nicht  möglich). 


Bitte  Postkarte  im 
Heft  benutzen! 


Platine,  unbestückt 

SCHNEIDERWARE  ist  in  drei  Versionen 
für  Sie  verfügbar.  Sie  können  nach  Bau¬ 
plan  selbst  bauen,  die  fertig  bestückten 
und  geprüften  Karten  über  den  Platinen¬ 
service  erhalten  oder  die  unbestückte 
Platine  erwerben.  Diese  werden  in 
Industriequalität  gefertigt,  sind  verzinnt 
und  gebohrt;  doppelseitig  beschichtete 
Platinen  sind  chemisch  durchkontak¬ 
tiert  und  geprüft.  Hierbei  haben  Sie  den 
Vorteil,  die  Platine  nicht  selbst  herstellen 
zu  müssen,  jedoch  die  Bestückungsko¬ 
sten  zu  sparen  und  die  Bauteile  selbst 
einzukaufen. 


Schneider  CPC  International 

Postfach  250,  3440  Eschwege 
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Listing:  Datalader  des  Verwaltungsprogramms 

10  DATA  401,400,490,421,409,490,403,401,480,409, 
20  DATA  490, 40D, 490, 421, 490, 4C3.43F, 490, 403,441, 
30  data  490,4C3,470,490,4C3,4ed, 490,403.491,491, 
40  DATA  403  ,  44  A,  491 ,  449 , 44B,  449 ,  454 ,  4B4 ,  442,  441 , 
50  DATA  &55,  SC4,  &53,  S49,  S4F,  &49,  &4B,  &49,  &D4,  &53, 
60  DATA  445,  44E,  404,  452,  445,  »43,  4D6,  450,  452,  449, 
70  DATA  »48,404,400,437,409^8,402,400,400,401, 
60  DATA  »EF,  4F9,  4FD,  421 , 45F,  490,  4FD,  47B,  400,  4ED, 
90  DATA  479, 4FD, »7E, 401 , SED, 479 , 4FD, 47B, 402, 4ED, 


100 

DATA 

110 

DATA 

120 

DATA 

130 

DATA 

140 

DATA 

150 

DATA 

160 

DATA 

170 

DATA 

180 

DATA 

190 

DATA 

200 

DATA 

210 

DATA 

220 

DATA 

230 

DATA 

240 

DATA 

250 

DATA 

260 

DATA 

270 

DATA 

280 

DATA 

290 

DATA 

300 

DATA 

310 

DATA 

320 

DATA 

330 

DATA 

340 

DATA 

350 

DATA 

360 

DATA 

370 

DATA 

380 

DATA 

390 

DATA 

Die 

945 

400 

410 

420 

1140 

430 

1668 

440 

1033 

450 

1035 

460 

1010 

470 

995 

480 

1629 

490 

1477 

500 

1124 

510 

1538 

520 

1415 

530 

1487 

540 

1262 

550 

1412 

560 

1333 

570 

1351 

580 

1319 

590 

1456 

600 

1535 

610 

1163 

620 

.  1849 

630 

1634 

640 

,  1566 

650 

1132 

660 

,  1745 

670 

1095 

680 

,  599 

690 

789 

700 

,  492 

710 

.  507 

720 

,  915 

730 

1647 

740 

,  1670 

750 

,  1618 

760 

,  1259 

770 

,  1111 

ALL 

,  1022 

780 

,  1019 

790 

DATA  405,, 421,400,  &70 , 401 , 409 , 42A, »26 , 491 , 401 ,  962 
DATA  »C9, 4CD, »9C,491,»DD,  »66, 401, 4DD, 46E, 400,  1362 
DATA  477 , 4C9 , »CD, »CC, 491 , »DA, 4B2 , 491 , 4E6 , 47F ,  1772 
DATA  421 , 4B5, 491, 4BB, 4CA, 4B2, 491 , 4CB, 47B, 4C0,  1595 
DATA  423, 4C3 , 4A7, »91 , »3E, 400, 409,401,402, »03,  811 
DATA  404,  405, 406,  »OB,  40F,  410, 411, 412,  413,  414,  134 
DATA  415, 416, 417, 418, 419, 41A, 41C,»1D,41F,  480,  357 
DATA  42A, 41B, 491, »BD, 44B, 420, »91 , 437, 43F, 4ED,  1061 
DATA  »42, 4CA, 4B7, 491, 42A, 41E, 491, 47B, 4CD, 4E9,  1425 
DATA  491 , 422 , 41B, 491 , 437 , 43F, 4C9 , 437 , 4C9 , 4C5 ,  1126 
DATA  423,  422, 428, 491, 401,  »FF,  46F,  437, 43F,  4ED,  976 
DATA  442,420,405,421,400,460,401,409,424,428,  708 
DATA  491 , 401 , 4C9, 4F5, »B5, 4C5, 4D5 , 4CD, 410 , 492 ,  1790 
DATA  4CD, 410, 492, 4D1 , 401 , 4B1 , 4F1 , 409, 4CD, 42E,  1699 
DATA  4BD, 4D8 , »CD, 42D, »92, 4D8, »CD, 431 , 4BD, 4C9 ,  1661 
DATA  »CD, 46 A, 492 , 4E6, 402, 408, 405 , 401 , 4E0 , 4F9 ,  1560 
DATA  4ED, 478,401, »CD, 44A, 492, 409, 42A, 422, 491,  1307 
DATA  4ED,  44B, 424, 491, 437, 43F, 4ED, 442, 4CA, 448,  1166 
DATA  492, 42A,  422,  491, 47E,  »CD,  479,  491, 422, 422,  1032 
DATA  »91 , »37 , 43F, 409, 437, 409, 42 A, 420 , 491 , 4CD,  1144 
DATA  4B9, 491 , »ED, 44B, 41 E, 491 , 437 , 43F , 4ED, 442 ,  1286 
DATA  »CA, 468 , 492, 42A, 420, 491 , »77, »CD, 4E9, 491 ,  1373 
DATA  422, 420, 491, 437, 43F, 409, 437, 409,405, »01,  984 
DATA  »El , 4F9 , 4ED, 478, 4C1 , 409 , 400, 400 , 400 , 400 ,  1225 
DATA  400,400,400,400,400,400,400,400,400,400,  0 
DATA  400,  0 
dat=0: sz=0: dz=  10 
FOR  adr  =  49000  TO  »9280 
READ  byte  ;  dat=dat+l 
sz=sz+byte 
POKE  adr, byte 

IF  dat  <  10  AHD  adr  <  49280  THEH  750 

READ  chksum 

IF  chksunOsz  THEH  PRIHT  "Fehler  in  zeile  : " ;  dz 
dz=dz  10  :  sz=0;dat=0 
HEXT  adr 

MODE  2: PRIHT: PRIHT"  MAIL. BI H  wird  gespeichert" 

PRIHT"  Datentraeger  fertigmachen,  dann  TASTE" :C 
4BB06 

SA VE" mail. bin” , b, 49000, »280 
EHD 


Ganze 


Nach  dem  erfolgreichen  Aufbau  der 
neuen  Karte  möchten  Sie  auch  damit 
arbeiten.  Dazu  benötigen  wir  eine  ge¬ 
eignete  Treibersoftware.  Bei  deren 
Erstellung  habe  ich  an  diejenigen 
unter  Ihnen  gedacht,  die  weniger  Er¬ 
fahrung  in  der  Assemblerprogram¬ 
mierung  besitzen.  Deshalb  erstellte 
ich  ein  Programm,  das  es  Ihnen  er¬ 
möglicht,  auf  einfache  Weise  durch 
logische  Basicbefehle  die  Betriebsbe¬ 
dingungen  der  Karte  einzustellen. 

Ein  solches  Programm  ausschließ¬ 
lich  in  Basic  zu  schreiben,  wäre  viel 
zu  langsam,  und  könnte  die  Ge¬ 
schwindigkeit  der  seriellen  Verarbei¬ 
tung  nicht  mithalten.  Das  Verwal¬ 
tungsprogramm  (Listing  1)  laden  Sie 
mittels  Datalader  in  Ihren  Rechner 
und  starten  es  mit  Run.  Nun  werden 
die  Hexadezimalzahlen  an  die  rich¬ 
tige  Stelle  im  Speicher  'gepoked'.  Die 
Startadresse  des  Programms  ist  HEX 
(&)  9000.  Nach  einem  Call  %90ü0  ste¬ 
hen  Ihnen  folgende  neuen  Befehle 
zur  Verfügung:  Mit  IBAUD,  A,  B  le¬ 
gen  Sie  die  Baudrate  fest.  Zuerst  wird 
allerdings  der  Timer  initialisiert.  'A’ 
steht  für  die  Sende-  und  B'  für  die 
Empfangsbaudrate.  In  unserem  Fall 
immer  beide  gleich  einstellen.  Der 
Befehl  ISIOINIT,A,B,C,D  initia¬ 
lisiert  den  seriellen  Baustein,  und  legt 


die  Übertragungsbedingungen  fest. 
A’  kann  sein  7  (7  BITS)  oder  8  (8 
BITS),'B’  schaltet  die  Parityprüfung 
ein  (1)  oder  aus  (0),  ’C  bedeutet  1  (1) 
oder  2  (2)  Stopbits  und  D’  legt  fest,  auf 
welchen  Wert  bei  Parity  ein  getestet 
werden  soll.  EVEN  (1)  bedeutet  ge¬ 
rade  Anzahl  von  Einsen  oder  gerade 
Parität  und  ODD  (0)  heißt,  daß  auf 
eine  ungerade  Anzahl  von  Einsen  ge¬ 
testet  werden  soll,  oder  ungerade  Pa¬ 
rität.  Der  Befehl  ISEND,ASC(”A”) 
übergibt  der  seriellen  Schnittstelle 
den  Hex-Wert  des  Zeichens  "A",  also 
den  Wert  Hex  &41.  Um  die  Schnitt¬ 
stelle  nun  bequem  von  Basic  aus  be- 

Bestückungsplan 


dienen  zu  können,  reservierte  ich 
zwei  Speicherbereiche  von  je  4KB 
(4096  Zeichen).  Diese  Buffer  werden 
von  einem  Programmteil  benutzt,  der 
die  eigentlichen  Druck-  und  Emp¬ 
fangsroutinen  enthält.  Dieser  Pro¬ 
grammteil  wird  300  mal  in  einer  Se¬ 
kunde  durch  eine  Routine  des  Be¬ 
triebssystems  (Kernel)  verwaltet. 
Dieser  Teil  erledigt  seine  Aufgabe  ge¬ 
radezu  vorbildlich  und  verwaltet 
diese  Bufferbereiche.  Die  Anwender, 
in  unserem  Fall  SIE,  übergeben  nur 
noch  Werte,  oder  holen  sich  die  Zei¬ 
chen  mittels  unseren  'langsamen'  Ba- 
sicbefehlen  und  können  die  Er- 
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Hardware 


gebnisse  gemütlich  zur  Anzeige  oder 
zum  Ausdruck  bringen.  Die  dafür 
nötigen  Befehle  lauten  IRECV,  @A; 
die  Integervariable  a  enthält  das  emp¬ 
fangene  Zeichen,  vorher  definieren 
mit  ‘Defint  a';  und  der  Befehl 
SPRINT,  ASC  (”A'’)  übergibt  an  den 
Druckerbuffer  den  Wert  des  ASCII- 
Zeichens  ”A".  das  ist  die  Zahl  &41. 


Zu  guter  LETZT 


Da  die  V/24-Schnittstelle  ungewohnte 
Pegel  verwendet,  mußten  besondere 
Treiberbausteine  eingebaut  werden. 
Demnach  entspricht  ein  logisch 
HIGH  bei  V/24  einer  Spannung  von 
-3  bis  -12  Volt  und  einem  logisch 
LOW  einem  Pegel  von  +3  bis  4-12 
Volt.  Um  diese  Pegel  zu  erzeugen,  gibt 
es  mehrere  Möglichkeiten.  Zum 
einen  stellt  die  Industrie  Schaltkreise 
her  (z.B.  MAX  232),  die  diese  Span¬ 


nungspegel  aus  einer  Spannung  von  5 
Volt  intern  erzeugen.  Der  Nachteil  ist 
momentan  die  schlechte  Bezugs¬ 
möglichkeit,  da  diese  Bausteine  re¬ 
lativ  neu  auf  dem  Markt  und  zudem 
teurer  sind.  Wir  verwenden  die  altein¬ 
gesessenen  V/24-T  rei  berbaustei  ne 
(MC  1488  und  MC  1489  )  und  führen 
nach  altem  Brauch  unsere +/-12  Volt 
an  die  Karte.  Diese  Spannungen  wer¬ 
den  wir  aus  dem  Universalnetzteil 
entnehmen,  das  ich  Ihnen  im  näch¬ 
sten  Heft  vorstellen  möchte.  Dieses 
Netzteil  ist  sowieso  bald  vonnöten, 
da  das  Netzteil  des  CPC  in  absehba¬ 
rer  Zeit  ja  doch  zu  schwach  wird  und 
wir  in  einen  der  nächsten  Heften 
unseren  intelligenten  Eprommer 
vorstellen  werden,  der  eine  dieser 
Spannungen  benötigt.  Vorläufig  kön¬ 
nen  Sie  die  +/-12  V-Spannungen 
auch  durch  zwei  9V-Batterien  erset¬ 
zen;  die  Schnittstelle  arbeitet  auch 
dann  noch  einwandfrei.  Bis  dahin 


wünsche  ich  Ihnen  viel  Erfolg  beim 
'SCHNEIDERN'  Ihrer  Erweiterungs¬ 
karten.  (P.  Richter/ME) 


Stückliste  der  V/24: 

IC  1:  74LS30 
IC  2:  74LS30 
IC  3:  74LS32 
IC  4:  74LS138 
IC  5:  74LS74 
IC  6:  8251 
IC  7:  8253 
IC  8:  74LS00 
IC  9:  74LS04 
IC  10:  MC  1488 
IC  11:  MC  1489 
IC  12:  74LS00 
RI:  1KOHM 
CI:  ELKO  luF 
C2:  ELKO  100  uF 
C3  -  C6:  WO  nF 
Dl:  LED  rot 
D2:  LED  gelb 
D3:  LED  grün 

Bul:  SUB-D-Buchse  25-polig 
Stl:  VG-Messerleiste  64-polig  a+c 


Repro  1+2:  Platinenlayout 
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Tips  &  Tricks 

Interrupt 
gesteuerte 

Musik 


für  464-664-6128 


Ü<1: 


In  Basic  werden  Töne  mit  Interrupts,  die  jede  1/50  Se¬ 
kunde  aufgerufen  werden,  programmiert.  Allerdings  gibt 
es  in  den  Tonwarteschlangen  nur  Platz  für  fünf  Töne  pro 
Kanal.  Sollen  mehr  als  fünf  Töne  erzeugt  werden,  dann 
wartet  der  Basic-Interpreter  in  der  entsprechenden  Zeile, 
bis  wieder  Platz  frei  ist.  Will  man  dies  umgehen,  dann  muß 
man  ein  Programm  haben,  das  automatisch  den  nächsten 
Ton  in  die  Register  des  Tongenerators  schreibt  und  dessen 
Länge  beachtet.  In  Basic  würde  dies  mit  den  EVERY-  oder 
ON  SQ  GOSUB-Funktionen  zu  lange  dauern,  deshalb 
muß  das  Steuerprogramm  in  Maschinensprache  geschrie¬ 
ben  sein. 

Der  Betriebssystemkern  (Kernel)  durchläuft  fünfzigmal 
in  der  Sekunde  (bei  jedem  Bildaufbau)  eine  Liste  von  Er¬ 
eignissen,  die  jedesmal  aufgerufen  werden  müssen.  Mit 
drei  solchen  Ereignissen,  für  jeden  Tonkanal  eines,  wird 
die  interruptgesteuerte  Musik  realisiert.  Man  könnte  alle 
drei  Kanäle  mit  einem  einzigen  Interrupt  steuern,  nur 
gäbe  es  dann  nicht  die  Möglichkeit,  einzelne  Kanäle  aus- 
bzw.  einzuschalten. 

Eine  Zählroutine  zieht  vom  Zähler  bei  jedem  Aufruf  1  ab. 
Ist  der  Zähler  gleich  0,  dann  wird  der  Tongenerator  (PSG) 
mit  dem  nächsten  Ton  versorgt.  Ist  bei  der  Tonhöhe  das 
16.  Bit  gesetzt  (z.B.  32768),  dann  wird  der  Tontabellenzei¬ 
ger  wieder  auf  den  Ausgangswert  gesetzt  und  die  Tonta¬ 
belle  wieder  von  vorne  durchgearbeitet.  Ist  das  15.  Bit  ge¬ 
setzt  (z.B.  16384),  dann  wird  der  Interrupt  für  den  entspre¬ 
chenden  Kanal  gelöscht  und  das  Ereignis  nicht  mehr 
aufgerufen.  Bei  der  Tonhöhe  werden  nur  die  unteren  zwölf 
Bits  beachtet,  eine  Prüfung,  ob  das  13.  oder  14.  Bit  gesetzt 
ist,  findet  nicht  statt. 


Folgendes  sollte  beachtet  werden: 

-  Beim  Einrichten  einer  Tontabelle  (Reihenfolge:  Ton¬ 
höhe,  Tonlänge)  muß  beachtet  werden,  daß  zur  gleichen 
Zeit  keine  Interruptroutine  auf  den  entsprechenden 
Speicherbereich  zugreifen  darf,  weil  dadurch  das  Steuer¬ 
programm  eventuell  durcheinander  gerät. 

(Vorher  mit  OFF  abschalten!) 

-  Zum  POKEn  der  16-Bit-Werte  steht  ein  RSX- Befehl 
DOKE  zur  Verfügung. 

-  Beim  Abschalten  eines  Tonkanals  wird  der  jeweils  letzte 
Ton  beibehalten.  Er  kann  gelöscht  werden,  indem  man 
die  Lautstärke  mit  dem  VOL-Befehl  auf  Null  setzt. 

-  Bei  der  Basic-Programmierung  (z.B.  Zeileneingabe)  oder 
bei  der  Benutzung  der  Basic-Soundbefehle  werden  die 
Interrupt-Töne  zerstört  (  auch  bei  PRINT  CHR$(7) ). 

-  Ein  mit  OFF  abgeschalteter  Interrupt  kann  mit  ON 
wieder  aktiviert  werden,  indem  man  hier  keine  Adresse 
angibt.  Wurde  die  Lautstärke  oder  sonst  ein  maßgebli- 
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ches  Register  zerstört,  dann  muß  es  vorher  wieder  auf 
den  richtigen  Wert  gebracht  werden. 

War  vorher  kein  Interrupt  vorhanden,  oder  wurde  der 
Interruptblock  verändert  so  kann  dies  unvorhersehbare 
Folgen  haben. 

-  Damit  ein  Ton  erklingen  kann,  muß  die  Lautstärke  des 
Kanals  mindestens  1,  das  Register  Nr.  7  richtig  geladen 
und  eine  Tontabelle  vorhanden  sein. 

-  Die  Tonlänge  wird  in  1/50  Sekunden  angegeben,  die 
Tonhöhe  wie  im  Handbuch  in  Anhang  7  (Seite  1  ff.)  be¬ 
schrieben. 

Für  die  Programmierung  stehen  RSX-Befehle  zur  Verfügung: 
OFF 

Abschalten  aller  drei  Interrupts 

OFF.A 

Abschalten  des  Interrupts  für  Kanal  A 

OFF.B 

Abschalten  des  Interrupts  für  Kanal  B 
OFF.C 

Abschalten  des  Interrupts  für  Kanal  C 
ON.A,  adresse 

Einschalten  des  Interrupts  für  Kanal  A 
ON.B,  adresse 

Einschalten  des  Interrupts  für  Kanal  B 
ON.C,  adresse 

Einschalten  des  Interrupts  für  Kanal  C 

VOL.A,  lautstarke 

Lautstärke  für  Kanal  A  setzen 

VOL.B,  lautstarke 

Lautstärke  für  Kanal  B  setzen 

VOL.C,  lautstarke 

Lautstärke  für  Kanal  C  setzen 

PSG,  register,  8-bit-wert 

Register  des  Tongenerators  beschreiben 

DOKE,  adresse,  16-bit-wert 

16-Bit-Wert  poken  ( Intel-Format ) 

Der  Wert  des  PSG- Registers  darf  sich  zwischen  0  und  13 
bewegen,  der  für  die  Lautstärke  zwischen  0  und  16. 

Ist  die  Lautstärke  auf  16  gesetzt,  dann  bestimmt  der 
Hüllkurvengenerator  die  Lautstärke  des  Tones.  Der 
Hüllkurvengenerator  kann  mit  drei  Registern  des  Tonge¬ 
nerators  beeinflußt  werden: 

11  Feineinstellung  Hüllkurven periode  0  -  255 

12  Grobeinstellung  Hüllkurvenperiode  0  -  255 

13  Hüllkurvenform  (8  Verschiedene)  0-15  (siehe  Abb.  1) 


ft¥-3~B813  Huellkurvenforften 


0 


4  A. 


«  AAAAAAAAAAAA/ 


ii  \T 


13 


Huellkurvenperiod» 


Huel lkurwenperiod» 


Register  Nr.  7: 

Das  Register  Nr.  7  steuert  das  Sperren  von  Tönen  oder 
Rauschen  auf  den  einzelnen  Kanälen.  Ist  ein  Bit  gesetzt, 
dann  wird  die  entsprechende  Funktion  gesperrt,  sonst 
zugelassen.  Bit  6  und  7  sind  für  die  Steuerung  der  I/O-Ports 
des  PSG  zuständig.  Sie  sind  für  die  Soundprogrammie¬ 
rung  uninteressant  und  werden  deshalb  auf  Null  gesetzt. 
Bit  76543210 
Kanal  00CBACBA 
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Die  Bits  0-2  steuern  die  Töne,  die  Bits  3-5  das 
Rauschen.  (Hermann  Röscheisen) 

Der  Assembler-Quellcode  befindet  sich  aus  technischen 
Gründen  auf  der  zugehörigen  CPC-Databox. 

Einsprung-Referenz: 

Für  die  Anpassung  des  Programms  an  CPC  664  und  CPC 
6128  hier  die  Einsprünge  in  die  Firmware  und  ins  Basic- 
ROM: 

B900  KL  UROM  ENABLE 
oberes  ROM  öffnen 
BCD1  KL  LOG  EXT 
RSX  einbinden 
BCD7  KL  NEW  FRAME  FLY 

neuen  Frame  Fly  Interrupt  initialisieren  und  einbinden 

BCDD  KL  DEL  FRAME  FLY 

Frame  Fly  Interrupt  löschen 

BD34  MC  SOUND  REGISTER 

Sound-Register  laden 

CA94  BAS  ERROR 

Basic-Fehlermeldung  ausgeben 


1000  REM 

1010  REI-I  Interrupt  mastered  rausic 
1020  REM  Copyright  5/1986  by  H.R. 

1030  REM 

1040  a=&A400:e=&A627:z=1150 
1050  MODE  2 : PRINT"Bitte  warten  !" 

1060  MEMORY  a-1:FOR  n=a  TO  e : READ  d$:IF  LE 
FT$(d$,1  )<»"&"THEN  1090 

1070  IF  c <  >  VAL { d  $ ) THEN  CLS : PR INT" Check summ 
enfehler  in  Zeile";z:END 

1080  c=0:d$="":IF  n=e  THEN  1120:ELSE  n=n-1 
:z=z+1 0 :GOTO  1110 
1090  d$="&" +d$ 

1100  POKE  n,VAL(d$):c=c+VAL(d$) 

1110  IF  n<e  THEN  NEXT 

1120  CLS : PRINT"Forma t :  SAVE"CHR$(34)"IMM.B 
IN"CHR$ ( 34 ) " ,B, &A400 ,&227" 

1130  PRINT: PRINT"RSX -Einbindung  mit  CALL  & 


12721 


A40Q , 

II 

► 

1140 

END 

1150 

DATA 

1160 

DATA 

1170 

DATA 

1180 

DATA 

1190 

DATA 

1200 

DATA 

1210 

DATA 

1220 

DATA 

1230 

DATA 

1240 

DATA 

1250 

DATA 

1260 

DATA 

1270 

DATA 

1280 

DATA 

1290 

DATA 

1300 

DATA 

1310 

DATA 

1320 

DATA 

1330 

DATA 

1  340 

DATA 

1350 

DATA 

1360 

DATA 

1370 

DATA 

1380 

DATA 

1390 

DATA 

1400 

DATA 

1410 

DATA 

1420 

DATA 

1430 

DATA 

1440 

DATA 

1450 

DATA 

1460 

DATA 

1470 

DATA 

1480 

DATA 

1490 

DATA 

1500 

DATA 

1510 

DATA 

BC,3E,C9, 
A4,C3,6A, 
9C,A4,C3, 
C3,E8,A5, 
A4 ,C3 ,C2 , 
DA, A4,C3, 
CI ,4F,4E, 
C3,4F, 46, 
CI , 4F, 46 , 
46 , 2E,C3 , 
56,4F,4C, 
2E,C3,50, 
C5,00,B7, 
A5,22,26, 
6E,00,22, 
C3 , 25 , A5 , 
10,A5,22, 
DD, 6E, 00  , 
A6,C3,36, 
CD, 1 0 , A5 , 
01 ,DD,6E, 
36 , A6 ,C3 , 
CD,E8,A5, 
18,06,06, 
FE, 01 ,C2, 
FE ,  1 1  ,  D2 , 
34, BD , FE , 
7E, 01 ,B7 , 
03,B7,C2, 
FE , 0E , D2 , 
C3,34,BD, 
DD, 66, 03, 
01 , DD, 5E, 
FE, 01 ,C2, 
C9 , 1 E, 02 , 
00 ,B9 ,C3 , 


32, 00, A4, 
A4 ,C3 , 83 , 
B5,A4,C3, 
C3,20,A6, 
A4 ,C3 ,C6 , 
FB , A4 , 4F, 
2E,C2,4F, 
C6 , 4F, 46 , 
46 , 2E, C2 , 
56 , 4F, 4C, 
2E,C2 , 56 , 
53,C7,44, 
CA ,25, A5 , 
A6 , DD, 66 , 
2C, A6 ,22 , 
B7 ,CA , 36 , 
28 , A6 ,DD, 
22,2E,A6, 
A5,B7,CA, 
22 ,2A, A6 , 
00,22,30, 
47 , A5 ,CD, 
C3,20,A6, 
09,18,02, 
1 9, A5,DD, 
1D,A5,4F, 
02 ,C2 , 1 9  , 
C2 , 1  D, A5 , 
1  D, A5,DD, 
1  D , A5 , DD , 
FE , 02 ,C2 , 
DD,6E, 02, 
00,73,23, 
1 9,A5 ,21 , 
18,02,1E, 
94, CA, 21 , 


C9,35 
A4  ,C3 
B0,A5 
C3,BE 
A4  ,C3 
4E,2E 
4E,2E 
46, 2E 
4F,  46 
2E,C1 
4F,4C 
4F,4B 

CD,  10 
01  ,  DD 
32, A6 
A5 ,  CD 
66,01 
22,34 
47, A5 
DD,  66 
A6 , 22 

BO, A5 
06,08 
06, 0A 
7E,  00 
78, C3 
A5,DD 
DD,7E 
7E,  02 
4E,  00 
19, A5 
DD,  56 
72, C9 
00,00 
05, CD 
38, A6 


,&397 
,  &522 
,&574 
,  &55A 
,&5BD 
,  &4AB 
,  &31  9 
,&327 
,  &321 
,4317 
,  &2D2 
,  &339 
,  &3ED 
,  &3B4 
,&25C 
,  &4B6 
,  &2E9 
,  &297 
,  &4B1 
,&3B7 
,&266 
,  &4AD 
,&3F1 
,  &057 
,&3DA 
,  &42D 
,  &44E 
,4415 
,  &  39B 
,  83CB 
,&434 
,  &3C6 
,  &30D 
,  &2A0 
,41P3 
,  &3D9 


1520 

1530 

1540 

1550 

1560 

1570 

1580 

1590 

1600 

1610 

1620 

1630 

1640 

1650 

1660 

1670 

1680 

1690 

1700 

1710 

1720 

1730 

1740 

1750 

1760 

1770 

1780 

1790 

1800 

1810 

1820 

1830 


DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


E5,CD, 
01 ,00, 
A6,E5, 
A5 , 01 
4A, A6 , 
72, A5, 
2A,26 
2B, 22 , 
7C,B5, 
A6,C9, 
EE, A5 , 
2C,A6, 
A7,A5, 
5E,  23 
3E,  01 
34,  BD 
32, A6, 
21,38, 
A6,7E, 
A5,CB, 
23,56, 
03, CD, 
34, BD, 
34, A6, 
21,41, 
A6,7E, 
A6 , CB, 
23,56, 
05, CD, 
34, BD, 
36, A6, 
21, 4A, 


O  I  ,  V.J 

CD,  DD 
00,81 
E5,CD 
01  ,00 
A6,7C 
26, A6 

CA, B6 
2A,2A 
2B,  22 
7E,  23 

CB,  71 
56,23 
CD,  34 
EB,  22 
22, 2C 
A6,C3 
23, 4E 
71  ,C2 
23,22 
34,  BD 
EB,  22 
22, 2E 
A6,C3 
23, 4E 
71  ,C2 
23,22 
34,  BD 
EB,  22 
22,30 
A6,C3 


■C3,D7, 
DD,BC, 
,81 ,C3, 
, B5 , CA , 
,C9,2A, 
,  A5 ,2B, 
,A6,7C, 
,2A,A6 , 
,  4E,CB, 
,C2,B0, 
,  22 , 2C, 
, BD , AF , 

r  2  6 , A6 , 

,A6,C3, 
,DD,BC, 
,  CB, 79 , 
,E8 , A5, 
,2E,A6, 
,3E,02 
, 28 , A6 
, A6 ,C3 
, DD , BC 
,CB, 79 
, 20 , A6 
,30, A6 
,3E,04 , 
,2A,A6, 
,A6,C3 
, DD,BC 


58,  A5 
21,41 
11,65 
BC,  21 
El  ,11 
D7,BC 
7F,A5 
28,  A6 
22,28 
B5,CA 
C9,2A 
79, C2 
A5,23 
A6 , 67 
4C,  CD 
C9,2A 
7F,A5 
2A,2E 
C2 ,  DF 
23, 5E 
67, 3E 
4C,CD 
C9,2A 
B6,A5 
2A,  30 
C2 , 1  7 
23, 5E 
67, 3E 
4C,CD 
C9,2A 
EE,  A5 
00,00 


,&53A 
,  &33A 
,4548 
,&39E 
,  &52D 
,  &3EF 
,4415 
,  42DA 
43CB 
,4464 
4  3  A3 
43C7 
44C2 
4255 
43C5 
43BD 
43B3 
43B3 
447A 
44B1 
4237 
431 A 
43BF 
43EE 
43BE 
43B2 
43EB 
4239 
431 E 
43C1 
442A 
436D 


[15051 
[1531  1 
[13551 
[18451 
[931  1 
[12321 
[1581  J 
[1724] 
[1901  ] 
[1881  ] 
[12251 
[17921 
[21721 
[15891 
[24101 
[20321 
[15391 
[1194  ] 
[1251  1 
[1444J 
[1379  1 
[1839  1 
[2369] 
[1258  1 
[1  346] 
(9171 
[8481 
[1216] 
(1741  ] 
[1640  ] 
(8461 
[1643J 


(2661  1 
[2297  ] 

>:*>>: 

[272] 

100 

REM 

[2721 

[1682] 

110 

REM  Demonstration  1 :  Menuett 

[2245J 

(22951 

120 

REM  Copyright  5/1986  by  H.R. 

(22971 

[2105] 

130 

REM 

[2721 

140 

MEMORY  &9FFF : LOAD" IMM. BIN" , &A400 

[867] 

[5293  1 

150 

CALL  &A400: 10FF: ;PSG,7,63 

124931 

160 

RESTORE  260 :adr=SA000 :GOSUB  230 

[1627] 

[3278] 

170 

RESTORE  320 :adr=&A1 00 :GOSUB  230 

[16331 

180 

RESTORE  370 :adr=&A200 :GOSUB  230 

[22421 

[308; 

190 

|PSG,7,&X1 1 1 000 

(10851 

[1925] 

200 

|ON.A,&A000: JON.B,&A100: !ON.C,&A200 

[2871  ] 

[1224] 

210 

! VOL.A, 10: |VOL.B,10: !VOL.C,10 

[1250] 

[3680] 

220 

END 

[1101 

230 

READ  a: IF  a=-1  THEN  RETURN 

[13931 

[3251  ] 

240 

!DOKE,adr,a:adr=adr+2:GOTO  230 

(2921  ) 

250 

REM  Kanal  A  (ab  Adresse  &A000) 

[1538] 

[110  1 

260 

DATA  190,10,213,10,239,20,284,20 

[2044] 

[2070] 

270 

DATA  213,20,179,20,190,20,213,10 

[2278] 

280 

DATA  239,10,253,20,190,10,213,10 

[1543] 

[962] 

290 

DATA  239,20,253,10,284,10,301,30 

[8391 

[5651 

300 

DATA  284,10,284,60,32768,-1 

[1477] 

[711  ] 

310 

REM  Kanal  B  (ab  Adresse  &A100) 

[2051  ] 

[19891 

320 

DATA  0,40,568,10,638,10,716,20 

[1760] 

[2024] 

330 

DATA  851,20,758,20,676,20,602,20 

(1821  J 

[2622] 

340 

DATA  758,20,568,20,426,20,379,40 

[1148] 

[2056] 

350 

DATA  0,65,32768,-1 

[11401 

[1377] 

360 

REM  Kanal  C  (ab  Adresse  &A200 ) 

(1427) 

[1996  ] 

370 

DATA  0,240,758,20,568,40,1136,20 

(12071 

[2148] 

380 

DATA  32768,-1 

(603) 

[1349] 

;%v*v 

.v.w.w.v 

[2103] 

iöö 

REM . 

‘[272  i”' 

[1502] 

110 

REM  Demonstration  2:  Tonleiter 

[24031 

[1141  ] 

120 

REM  Copyright  5/1986  by  H.R. 

122971 

[1992] 

130 

REM 

[272] 

[3095] 

140 

MEMORY  &9FFF : LOAD" IMM. BIN" , & A4 00 

[867] 

[19561 

150 

CALL  &A400: !OFF: |PSG,7,63 

[2493  1 

[91  1  1 

160 

adr=&A000:FOR  oct=0  TO  1 :GOSUB  260:NEX 

12677] 

[1945] 

T 

[1697] 

170 

}DOKE,adr, 32768 

[1751  ] 

[13251 

180 

adr=&Al00:FOR  oct=1  TO  2:GOSUB  260:NEX 

[2017  ] 

[1207] 

T 

[1909] 

190 

iDOKE,adr, 32768 

[1751  ) 

[605] 

200 

adr=&A200:FOR  oct=-1  TO  0:GOSUB  260 :NE 

135941 

[829] 

XT 

[1416  ] 

210 

iDOKE,adr, 32768 

[1751  ] 

[1232] 

220 

i VOL.A, 1 5 : | VOL.B, 1 5: |VOL.C,15 

[1204] 

[1516] 

230 

!PSG,7,&X1 1 1 000 

[1085  ] 

[1466] 

240 

!ON.A,&A000: |ON.B,&A100: JON.C,&A200 

(2871 ] 

12266] 

250 

END 

[1101 

[950] 

260 

FOR  tone=1  TO  12 

[10281 

[1916] 

270 

freq=440  * ( 2“ (oct  +  ( tone-1  0 )/1  2 ) ) 

[17861 

[1816] 

280 

period=ROUND( 62500/ freq) 

(16891 

[951  1 

290 

|DOKE,adr,period:adr=adr+2 

[34001 

[2119] 

300 

! DOKE,adr , 1 0 :adr=adr+2 :NEXT 

[29831 

[1416  ] 

310 

RETURN 

[555  1 
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Tips  &  Tricks 


Liste#  I 


Für  das  Ausdrucken  von  Textdateien  unterCP/M  hatman 
ursprünglich  zwei  Möglichkeiten:  Durch  Drücken  von 
CTRL-P  wird  alles,  was  auf  dem  Bildschirm  ausgegeben 
wird,  auch  auf  dem  Drucker  protokolliert.  Mit  TYPE  Da¬ 
teiname  wird  dann  die  Datei  auf  Bildschirm  und  Drucker 
ausgegeben.  Allerdings  werden  dabei  auch  alle  Systemmel¬ 
dungen  auf  Papier  gedruckt  und  stören  das  Erscheinungs¬ 
bild  des  Textes.  Ein  erneutes  Drücken  von  CTRL-P  schal¬ 
tet  diesen  Modus  wieder  ab. 

Als  Alternative  kann  der  Text  mit  Hilfe  des  PIP-Dienst- 
programmes  (PIP  lst:=dateiname[optionen|)  zu  Papier 
gebracht  werden.  Hierbei  stehen  vielfältige  Optionen  zur 
Manipulation  des  auszudruckenden  Textes  zur  Verfü¬ 
gung.  z.B.  kann  die  Seitenlange  bestimmt  werden  oder  der 
Text  mit  Zeilennummern  versehen  werden. 

Allerdings  besteht  bei  beiden  keine  einfache  Möglichkeit, 
die  Schriftart,  mit  der  gedruckt  werden  soll,  festzulegen. 
Dazu  müßte  man  den  Drucker  entweder  von  Basic  aus  ein¬ 
stellen  oder  auf  das  Dienstprogramm  SETLST  zurückgrei¬ 
fen.  Um  diesem  Umstand  zu  entgehen,  wurde  Lister  II  ge¬ 
schrieben. 

Das  Programm  ist  vollständig  in  Turbo-Pascal  3.00  ge¬ 
schrieben  und  wurde  auf  einem  CPC  6128  entwickelt.  Um 
das  Programm  in  der  CPC  464/664  Turbo-Version  compi- 
lieren  zu  können,  muß  die  Frage  "Include  Error  Messages?” 
mit  ”Nein”  beantwortet  werden.  Das  Programm  ist  eben¬ 
falls  auf  dem  Joyce  lauffähig.  Bei  den  Steuercodes  für  die 
Aktivierung/Abschaltung  der  einzelnen  Druckerfunktio¬ 
nen  im  Drucker-Menue  handelt  es  sich  um  Codes  für  den 
Drucker  Brother  M- 1009,  und  müssen  bei  Verwendung  ei¬ 
nes  anderen  Druckers  eventuell  entsprechend  geändert 
werden. 

Das  Programm  kann  nicht  durch  Drücken  von  CTRL-C 
abgebrochen  werden;  wem  dies  jedoch  nicht  liegt,  ersetzt  die 
Compiler-Option  {$C-}  mit  {$C+}  im  Quelltext. 

Da  das  Programm  vollständig  menuegesteuert  ist.  braucht 
man  nur  die  entsprechende  Funktion  zu  wählen  und  das 
Programm  führt  diese  sofort  aus.  Das  danach  ertönende 
Beep-Signal  bestätigt  die  Abarbeitung  der  Funktion. 
Lister  II  besteht  aus  drei  Teilen: 

-  Das  Drucker-Menue  übernimmt  die  Einstellung  der  zu 
druckenden  Schriftart,  wobei  auch  Kombinationen  ver¬ 
schiedener  Arten  möglich  sind  (näheres  dem  Drucker- 
Handbuch  entnehmen!).  Hier  hat  man  auch  die  Möglich¬ 
keit,  eine  Überschrift  zu  drucken. 

-  Der  Punkt  2  im  Hauptmenue  ermöglicht  dann  den  Aus¬ 
druck  einer  Textdatei  in  der  vorher  eingestellten  Schrift¬ 
art.  Dabei  wird  der  gedruckte  Text  auch  auf  dem  Bild¬ 
schirm  angezeigt. 

-  Mit  Punkt  3  kann  man  einen  einzugebenden  Text  druk- 
ken  lassen,  um  die  gewählte  Schriftart  zu  kontrollieren. 

Durch  Drücken  der  X-Taste  wird  das  Programm  verlassen 
und  zu  CP/M  zurückgekehrt.  (Stefan  Schulte  Strathaus) 
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6otoJ¥  (19*1,3);  wri te( char( I 38) > ; 
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CPC-Listingservice 
für  464-664-6128  »AI 


Wie  in  jedem  Heft,  finden  Sie  auch  hier  wieder  den 
Listingservice.  der  Ihnen  helfen  soll,  die  in  unserem  Ma¬ 
gazin  abgedruekte  "Paperware”  in  "Software"  für  Ihren 
Rechner  zu  verwandeln.  Neben  den  Piktogrammcn  für 
Kassetten-ZDiskettenbetrieb  und  der  Angabe  der  Lauffä¬ 
lligkeit  finden  Sie  die  Super-Eintipphilfe  "Checksummer". 
Um  den  Checksummer  benutzen  zu  können,  genügt  es, 
das  Programm  einmal  aufzurufen;  es  generiert  selb¬ 
ständig  den  Maschinencode,  aktiviert  den  Checksummer. 
gibt  eine  Bereitschaftsmeldung  aus  und  löscht  sich  an¬ 
schließend  selbst  wieder.  Ab  jetzt  w  ird  jede  Eingabe,  nach¬ 
dem  man  ENTER  gedrückt  hat.  mit  der  Ausgabe  einer 
Quersumme  quittiert.  Beim  Eintippen  von  Programmli- 
stings  kann  man  nun  durch  den  Vergleich  der  beiden  in 
eckigen  Klammern  stehenden  Zahlen  feststellen,  ob  man 


sich  vertippt  hat  und  ggf.  den  Fehler  sofort  berichtigen. 
Des  weiteren  hat  man  die  Möglichkeit,  mit  dem  RSX- 
Befehl  CHECK.s.z  ein  Listing  mit  den  dazugehörigen 
Checksummen  zu  erzeugen.  Die  Parameter  s  und  z  defi¬ 
nieren  den  Ausgabekanal  (s  =  0  bis  9)  und  die  Zeilennum¬ 
mer.  ab  der  mit  der  Ausgabe  begonnen  werden  soll;  wird  z 
nicht  angegeben,  so  wird  an  dessen  Stelle  1  ange¬ 
nommen. 

Vor  dem  Druck  sollte  man  mit  WIDTH  x  die  maximale 
Breite  (x)  einer  Zeile  festlegen.  Mit  Hilfe  der  RSX-Befchle 
ON  und  OFF  kann  der  Cheksummer  ein-  bzw.  ausgeschal¬ 
tet  werden. 

Bei  der  Berechnung  der  Quersumme  werden  die  Zeilen¬ 
nummer  und  Leerzeichen  überlesen;  zwischen  Groß-  und 
Kleinschreibung  w  ird  nur  innerhalb  zweier  Anführungs¬ 
striche  unterschieden,  da  ansonsten  die  Schreibweise  von 
Befehlsworten  und  Variablennamen  keinen  Einfluß  auf 
die  Funktionstüchtigkeit  eines  Basicprogrammes  hat. 

(Thomas  Fippl) 


too 
1 1  0 
1  20 
130 
1  40 
1  50 
1  60 
170 
1  80 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
31  0 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
460 
490 
500 
510 
520 


REM  •»*  CHECKSUM  464  *** 
MEMORY  &A4FF 
FOR  a% =&A500  TO  SA607 
READ  by  te  $ 

POKE  a% ,  VAL( "&"+by teS ) 

NEXT 

PRINT 

PR INT" CHECKS UM  v2" 

CALL  &A50C : |ON:NEW 


DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


21  ,  09  ,a5 
bc, 00 , 00 
2a ,  a5  ,c3 
4f , ce , 4  f 
43, cb, 00 
a  8  ,  a  5 , 2 1 
24  ,  a5 , 28 
06 ,dd , 1 1 
ed , bO ,c9 
28 , 08 , Od 
18,04,7b 
cl  ,c.a,a3 
23 , 5e , 2  3 
cd , 3c, c4 
ei ,21 ,a4 
18,e2,e5 
98  ,a5 ,cd 
a5 ,cd , 4e 
cd,98,a5 

за, 24,ac 
c8 ,cd ,45 
cd  ,24,a5 
ba,a5,cd 
fl  ,c9 ,eb 
2f ,32,23 

зб ,  04 , f e 
a7  ,cß , 4 f 
20,28, f 3 
3a , 23 ,a5 
23,a5,a7 
ad,07,6f 
cd , 5c,c3 
cd, 7 9 ,ee 


,01 , Od 
,00,00 
, 2  f  ,a5 
, 46 , c6 
,00, cf 
, 27 ,a5 
, 06 , cd 
,  3a ,  bd 
,  4  f  ,cd 
,  20 ,  ea 
,11  ,01 
,e7,e5 
,56, ei 
,e5 , 09 
,ac,cd 
,cd, ba 
,96, f 2 
,c3,e1 
, cd , 4e 
,d6 , 08 
,e1 ,23 
,f 5,c5 
,  f 6 ,a5 
,1b, af 
,a5,13 
, 0a , 38 
,3a, 23 
,  7  9  ,  f  e 
,2f ,32 
,  79 ,c4 
,09,18 
,3e,5b 
, 3e, 5d 


,a5 ,c3 ,d1 
,  1  8  ,  a5 , c3 
,c3 , 43 ,a5 
,43,48,45 
,98 ,aa ,c3 
,1 8,03,21 
,00 , b9 ,c3 
,01,03,00 
,00 , b9 , Od 
,  dd  ,  7  e  ,  0  2 
,  00 ,cd ,a2 
, 4e, 23 , 46 
, 78 ,b1 ,cö 
,e3,cd,63 
, 7a , a5 ,e1 
,a5 ,e3 ,cd 
,e3 ,cd, f 6 
, 7e , a? , c8 
,c3 , 1 8 , f  5 
,47,7e,a7 
, 1 0 , f 7 , c9 
,d5,e5,cd 
, ei ,d1  ,c1 
,  4 7 , 67 , 6 f 
, 1 a ,d6, 30 
,  f  6 , 1  a  ,  1  3 
,a5 ,a1 , fe 
,2 2,20,07 
, 23 ,a5 , 3a 
,8a, ff  ,4f 
,d8 , 3o , 20 
,cd, 5c, c3 
,c3 , 5c, c3 


100 
110 
1  20 
1  30 
1  40 
150 
1  60 
170 
1  80 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
4  30 
440 
450 
460 
470 
480 
490 
500 
510 
520 


REM  '*•  CHECKSUM  664 
MEMORY  ÄA4FF 
FOR  a%=&A500  TO  &A607 
READ  byte$ 

POKE  a% , VAL ( " +by te$ ) 

NEXT 

PRINT 

PRINT"CHECKSUM  v2" 

CALL  &A500 : ION: NEW 

DATA  21 ,09,a5,01 ,0d,a5,c3,d1 
DATA  bc ,00,00,00,00,18,a5,c3 
DA1A  2a,a5,c3,2f,a5,c3,43,a5 
DATA  4f,ce,4f,46,c6,43,48,45 
DATA  43 , cb  ,  00 , 00 ,cf ,02 , ac, c3 
DATA  aS,a5,21 , 27 , a5 , 1 8 , 03 , 21 
DATA  24,a5,28,06,cd,00,b9,c3 
DATA  4c,cb,1 1 ,5b,bd,01 ,03,00 
DATA  ed , bO ,c9 , 4 f ,cd, 00 , b9 , Od 
DATA  28 , 08 , 0d , 20 ,ea , dd , 7e , 02 
DATA  18, 04, 7b, 1 1 ,01  ,00, cd, a9 
DATA  cl ,cd,69,e8,e5,4e,23,46 
DATA  23, 5e, 23, 56, ei ,78, bl ,c8 
DATA  cd , 75 , c4 , e5 , 09 ,e3 , cd , 59 
DATA  e2 , 21 , 8a , ac,cd , 7a , a5 , ei 
DATA  1 8 , e2 , e5 , cd , ba ,a 5 , e3 ,cd 
DATA  98,a5,cd,53,f3,e3,cd,f6 
DATA  a5 , cd , 9b , c3 ,e1 , 7e , a7 ,c8 
DATA  cd , 98 ,a5 ,cd , 9b ,c3 , 1 8 , f 5 
DATA  3a,09,ac,d6,08,47,7e,a7 
DATA  c8  ,cd  ,.22  ,  e2 , 2  3 , 1  0  ,  f  7  ,c9 
DATA  cd  ,  2  4  ,  a  5 ,  f  5  ,  c  5  ,  d  5  ,  e  5  ,  cd 
DATA  ba ,a5 ,cd , f 6 ,a5 , ei ,d1 ,c1 
DATA  f 1 ,c9,eb,1b,af  ,47,67,6f 
DATA  2f  ,32,23  ,  a5,1 3,1a, d6, 30 
DATA  38,04,fe,0a,38,f6,1a,13 
DATA  a7 ,c8 , 4 f , 3a , 2 3 , a5 , al , f e 
DATA  20,28,f 3 , 79 , f e, 22 , 20 , 07 
DATA  3a,23,a5,2f ,32,23,a5,3a 
DATA  23,a5,a7,79,c4,ab,ff ,4f 
DATA  ad,07,6f ,09,18, d8,3e, 20 
DATA  cd,a3,c3, 3e , 5b , cd , a 3 , c3 
DATA  cd , 49 ,ef , 3e, 5d ,c3 ,a3 ,c3 


1  00 
1 1  0 
1  20 
130 
1  40 
1  50 
1  60 
170 
1  80 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
49-0 
500 
510 
520 


REM  *“  CHECKSUM  6128  ’** 
MEMORY  &A4FF 
FOR  a%=&A500  TO  &A607 
READ  byte$ 

POKE  a% , VAL( "&"+byte$ ) 

NEXT 

PRINT 

PR INT" CHECKSUM  v2" 

CALL  &A500: jONrNEW 

DATA  21 ,09,a5,01 ,0d,a5,c3,d1 
DATA  bc,00,00,00,00,18,a5,c3 
DATA  2a , a5 , c3 , 2f  ,a5 ,c3 , 43 ,a5 
DATA  4f ,ce,4f , 46 , c6 , 43 , 48 , 45 
DATA  43 ,cb , 00 , 00 ,cf ,02 ,ac, c3 
DATA  a8,a5,21 ,27, a5, 18, 03, 21 
DATA  24,a5,28,06,cd,00,b9,c3 
DATA  49,cb,1 1 ,5e,bd, 01 ,03,00 
DATA  ed , bO ,c9 , 4 f ,cd , 00 , b9 , Od 
DATA  28 , 08 , Od , 20 , ea ,dd , 7e, 02 
DATA  1 8 ,04,7b, 1 1 ,01 , 00,cd,a6 
DATA  cl  ,cd , 64 , e8 ,e5 , 4e, 23 , 46 
DATA  23, 5e, 23, 56, ei ,78, bl ,cö 
DATA  cd,72,c4,e5,09,e3,cd,54 
DATA  e2 , 2 1 , 8a , ac , cd , 7a , a5 ,e1 
DATA  18,e2,e5,cd,ba,a5,e3,cd 
DATA  98 ,a5,cd, 53 , f 3 , e3 ,cd , f 6 
DATA  a5  , cd , 98 , c3 , ei , 7e , a 7 , c8 
DATA  cd,98,a5,cd,98,c3,18,f5 
DATA  3a, 09 , ac ,d6 , 08 , 47 , 7e, a? 
DATA  c8,cd,1d,e2,23,10,f7,c9 
DATA  cd,24,a5,f 5 , c5 ,d5 , e5 , cd 
DATA  ba,a5,cd,f6,a5,e1,d1,c1 
DATA  fl ,c9,eb,1b,af,47,67,6f 
DATA  2f  ,32,23,  a5,1  3,1a,  <36, 30 
DATA  38,04,fe,0a,38,f6,1a,13 
DATA  a7,c8,4f,3a,23,a5,a1,fe 
DATA  20, 28, f 3,79, fe, 22, 20, 07 
DATA  3a,23,a5,2f  ,32, 23, a5, 3a 
DATA  23,a5,a7,79,c4,ab,ff,4f 
DATA  ad,07,6f ,09,18, d8,3e, 20 
DATA  cd,aO,c3,3e,5b,cd,aO,c3 
DATA  cd,44,ef,3e,5d,c3,a0,c3 
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Der  Data  Media 


COMPUTERCLUB 

Jetzt  gibt  es  eine  neuartige  Möglichkeit  zum  besonders  günstigen  Einkauf:  Den  Computerclub! 

SOFTWARE  -  HARDWARE  -  BÜCHER  -  PERIPHERIE  -  ZUBEHÖR 

für  die  Computersysteme 

...  Schneider  -  Commodore  -  Atari  -  MSX  ... 


Umsonst  ist  der  Tod...  aber  für  den  Jahresbeitrag  von  nur  60,-  DM  erhalten  Sie  als  Leistungen: 

-  die  Möglichkeit,  von  den  besonders  preiswerten  Einkaufsmöglichkeiten  des  Computerclubs  Gebrauch  zu  machen, 
so  oft  Sie  wollen;  entweder  durch  Bestellung  aus  den  Angeboten  des  Clubkataloges  oder  durch  direkten 
Einkauf  in  den  Club-Zentren. 

Die  Clubkarte  im  Scheckformat,  die  Sie  als  Clubmitglied  ausweist,  erhalten  Sie  nach  Zahlung  des  Jahresbei¬ 
trages. 

-  ein  Kaufzwang  oder  eine  bestimmte  Kaufverpflichtung  pro  Quartal  besteht  NICHT!!  Sie  allein  bestimmen,  wie 
oft  Sie  von  den  Angeboten  Gebrauch  machen  wollen. 

-  pro  Quartal  senden  wir  Ihnen  den  umfangreichen  Clubkatalog  kostenlos  zu,  der  ständig  durch  zusätzliche 
Informationen  über  Neuerscheinungen  und  weitere  Sonderangebote  ergänzt  wird. 

-  Fachberatung  in  den  Club-Zentren  oder  über  den  Telefonservice  für  Clubmitglieder  über  die  Rufnummer 
0231/125074  und  125075,  in  derZeit  von  14-  17  Uhr. 


DATA  MEDIA  Computerclub-Zentren  gibt  es  ab  1.  Mai  1986  in: 

1000  Berlin  44,  Einser  Str.  22 
4600  Dortmund,  Ruhrallee  55 

Geplant  sind  in  Kürze:  Hamburg,  Frankfurt,  München,  Stuttgart 

Wie  wird  man  Clubmitglied? 

Die  Beitrittserklärung  kann  mittels  der  Postkarte  (im  Innenteil  dieser  Zeitschrift)  geschehen. 

Falls  Sfe  vorher  zusätzliche  Informationen  und  den  Clubkatalog  wünschen,  bitte  anfordern  (DM  2,- für  Porto 
beifügen): 


Data  Media  Computerclub 

Data  Media  GmbH,  Ruhralle  5  5, 4600  Dortmund 
Tel.:  (02  31)  12  JO  71-3 


Bestellkarte  benutzen! 
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Tips  &  Tricks 

Rückfahrkarte  für 
Parameter 


b  -  PEEKC  8ADB53  +25S“PEEK  C  8ADB6  3 
c  -  PEEKC  6ADB9  3  +B56*PEEKC8ADBA  3 
d  -  PEEKC8ADB83 
s  -  PEEKC8ADB33 
f  -  PEEKCSADB4) 

0  -  PEEKC8ADB73 


für  464 


SPEED  INK  a,  b 
SPEED  KEY  a, b 


a  -  PEEKC8B1DB3 
b  -  PEEKCSB1D73 

a  -  PEEKCBB4EA3 
b  -  PEEKC8B4E93 


Wenn  es  um  Parameter  von  Grafik,  Sound  usw.  geht,  zeigt 
sich  der  Rechner  (zumindest  von  Basic  aus)  nicht  sehr 
auskunftsfreudig:  Man  kann  zwar  (fast)  alle  Parameter 
mit  Basic-Befehlen  an  den  Rechner  übergeben  und  einige 
wenige  auf  dieselbe  Weise  auch  wieder  zurückerhalten, 
die  meisten  jedoch  verschwinden  auf  Nimmerwiederse¬ 
hen  im  Rechner. 

Glücklicherweise  werden  sie  aber  (meistens  unverändert) 
irgendwo  im  RAM  abgelegt,  damit  das  Betriebssystem  sie 
dort  bei  Bedarf  abrufen  kann.  Doch  was  dem  Betriebssy¬ 
stem  recht  ist,  kann  dem  User  nur  billig  sein,  und  so  holt  er 
sich  eben  (mittels  PEEK)  alle  die  Parameter  wieder 
zurück,  die  ihm  das  Basic  sonst  vorenthält.  Wie,  das  soll 
die  untenstehende  Liste  zeigen. 

Wenn  Sie  einmal  etwas  andere  Werte  zurückbekommen 
als  Sie  kurz  zuvor  eingegebenen  haben,  so  sollte  Sie  das 
nicht  wundern:  Der  Rechner  überprüft  und  korrigiert  na¬ 
türlich  alle  Werte,  bevor  er  sie  im  RAM  ablegt. 

(Thomas  Kochmann) 


SPEED  WRITE  n  n  -  C PEEK C8BBD 13-65/6 

SYMBQL  n,b(l),bCS3. .. .  bCi)  -  PEEK  CHI MEM+i +B*C  n-PEEKC  8B294  333 

SYMBOL  AFTER  n  n  -  PEEKC8B2943 

TAG  #n  wann  n-O:  PEEKC8B2933-0  ->  TABOFF 

PEEKC8B2933-2S5  ->  TAG 

wenn  n>0:  PEEKCSB21B+15«n3-0  ->  TAGOFF 
PEEK  C  SB21 8+ 15*rt  3-255  ->  TAB 

TABOFF  #n  a.  TA6  #n 

W1DTH  n  n  -  PEEKCSAC243 

WINDOW  ttn  ,  a ,  b  ,  c ,  d  wenn  n-O:  e  -  PEEK C8B289 3+1 

b  -  PEEKC 8B2BB3+1 
c  -  PEEK CBB2B6 3+1 
d  -  PEEKC 8820 A3 +1 

wenn  n>0:  e  -  P£EKC8B2U+15*n3+l 
b  -  PEEKC  8BH13+I5*r>3  +  1 
c  -  PEEK C8B210+15*n 3+1 
d  -  P£EKC8B212+15»n3+l 

ZONE  n  n  -  PEEKC8AE793 


"Rück Fahrkarte  Für  Parameter" 


Tabelle  1:  Umwandlung  von  aC13  in  bd3: 


"RückFahrkarte  Für  Parameter 


BOHDER  bC 1 3 , bC23  aC13  -  PEEKC8B1D93 

aC23  -  PEEKCRB1EA3 

weiter  siehe  Tabelle  1 


aU?-.. 


bCi  3- 


3U.J- 

bC  i  3— 


012345676  3  IQ  11  15  13  .14.  .15 

13  27  13  25  1  7  10  IG  2B  29  24  26  G  8  15  17 

.16 .17- IS. .13  £Q  51  gg  S3  SU  gg.  56. £7  SB  £3  .30  .31 


30  31  1B  20  0  2  3  11  4  22  21  23  3  5  12  14 


CALL  a 
CLG  i 


DEG 

01 

DRAU  x.u.i 


■  -  PEEKC  8AE72  3  +256*PEEK  CÄAE73  3 

J  -  PEEKC8B33S) 
weiter  siehe  Tabelle  2 

PEEKC8BBF73-0  ->  RAD 
PEEKC8BBF73-25S  ->  0E3 

PEEKCaB135)-0  ->  DI 
PEEKC8B1953-32  ->  EI 

s.  PLOT  x.y.i 


Tabelle  2:  Umwendluno  von  j  in  i: 


MODE  0:  i" 
MODE  1:  !■ 
MODE  2:  !■ 


Q  3  1£  15  iS  51  60  63 

08  2  10  4  12  6  14 

0—  —  2---- 
0------- 


192  135  204  207  240  243  252  255 

1  9  3  11  5  13  7  15 

1  -  -  3 


CUlie  diese  Werte  zustande  kommen.  Findet  man  z.B. 
in  "CPC  International”,  11/85,  S.  34  F  beschrieben! 


DRAUR  x.y.i 


s.  PLOT  x.y.l 


EI 

ENT  n, bCi 3 , b(23 , . . . 
ENU  n.bC 1 3 , bC23 , . . . 
INK  n, bC 1 3 , bC23 


KEY  n.text* 


KEY  DEF  n.x.o.b.c 


MDDE  n 

ORIGIN  x.u.a.b.C.d 


PAPER  *n,i 

PEN  8n, i 

PLOT  x.y.i 


PLOTR  x.u.i 
RAD 

SOUND  a , b, c,d , e, F, o 


s.  DI 

bC13  -  PE£KCRBEFA+16*AB5Cn3+i3 

b(i3  -  PEEKC 8BEOA+16*n+ 1 3 

eCl 3  -  PEEKC8BlDA+n3 
bC23  -  PEEKC8BlEB+n3 
weiter  siehe  Tabelle  1 

Die  Texte  werden  von  Adresse  8B446  an  im 
RAM  abgelegt.  Jeder  Text  beginnt  mit  dar 
der  Anzahl  seiner  Zeichen  C-  LENCtext*33. 
Die  einzelnen  Texte  werden  in  der  Reihen- 
Folge  n-128,  n-129,  usw.  hintereinander 
abgelegt . 

x  -  CPEEKCR843C+n\B3\2‘Cn  MOD  833  MOD  2 
e  -  PEEKC8B34C+n3 
b  -  PEEK<8B39C+n3 
c  -  PEEKC8B3EC+n3 

n  -  PEEKC8B1CB3 

x  -  UNTCPEEKC«B32B3+25G*PEEKC8B32933 
U  -  UNTCP£EKCRB3HA3+25S*PEEKC8B32B3 3 
a  -  CPEEKC8B3303+256*PEEKC8B331 3 3 
*2‘ CH-PEEKC8B1CB33 
b  -  C PEEKC  BB3323  +256*PEEKCRB333 3  3 
■2" <2-PEEKC8BlC83  3 
c  -  PEEKC 883343*2 
d  -  PEEKC8B33B3 *2 

wenn  n-O:  J  -  PEEKC8B2903 
wenn  n>0:  J  -  PEEKC8B21B+15*n3 
weiter  siehe  Tabelle  2 

wenn  n-O:  J  -  PEEKC8B28F3 
warm  n>0:  J  -  PEEKC 8B217+15*n3 
weiter  siehe  Tabelle  8 

x  -  XPOS  und  u  -  YPOS 
J  -  PEEKC8B33B3 
weiter  siehe  Tabelle  2 

s.  PLOT  x,y,i 

b.  DEG 

e  -  PEEKC8ADB23 


Grafik  Hardcopy  für 

Anspruchsvolle 

für  464-664-6128  y  g 

Wohl  jeder  Druckerbesitzer  hat  irgendwann  einmal  den 
Wunsch  gehegt,  seine  mühsam  aufgebaute  Bildschirm¬ 
grafik  zu  Papier  zu  bringen,  und  mit  einer  der  vielen 
Hardcopyroutinen,  die  bereits  veröffentlicht  wurden, 
schien  das  auch  kein  Problem  zu  sein.  Das  Ergebnis  ent¬ 
sprach  dann  jedoch  meist  nicht  den  Erwartungen,  so  daß 
diese  Idee  ersteinmal  wieder  in  der  Versenkung  ver¬ 
schwand. 

Aus  dieser  Erfahrung  heraus  veröffentlichen  wir  das 
nachfolgende  Programm,  das  gegenüber  den  herkömmli¬ 
chen  Routinen  einige  wesentliche  Verbesserungen  auf¬ 
zuweisen  hat. 

Zunächst  einmal  ist  dies,  unseres  Wissens  nach,  die  erste 
Hardcopy-Routine,  die  alle  8  Bits  der  Centronics-Schnitt- 
stelle  nutzt. 

Voraussetzung  zum  einwandfreien  Betrieb  ist,  daß  Sie  in 
Ihrem  Rechner  eine  der  vielen  Hardware-Erweiterungen 
für  das  achte  Bit  eingebaut  haben  (z.B.  "Operation  gelun¬ 
gen..."  Heft  5/86).  Selbstverständlich  funktioniert  es  auch 
mit  jeder  anderen  Erweiterung. 
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"Tips  &  Tricks 


Weiterhin  werden  die  Bildschirmfarben  -  anders  als  sonst 
üblich  -  auf  dem  Papier  durch  entsprechende  Rasterung 
wiedergegeben,  so  daß  Besitzer  eines  Grünmonitors  eine 
fast  100  %-ige  Kopie  des  Bildschirms  erhalten.  Da  diese 
Rasterung  in  Mode  2  nicht  nötig  ist  und  in  Mode  0  nicht 
realisiert  werden  kann,  kann  die  Routine  nur  in  Mode  1 
aufgerufen  werden. 

Um  eine  wirklich  verzerrungsfreie  Grafik  zu  erhalten, 
wird  ein  besonderer  Druckmodus  verwandt,  in  dem  der 
Drucker  die  Punkte  horizontal  in  genau  dem  gleichen  Ab¬ 
stand  bringt  wie  vertikal. 

Das  Bild  wird  dabei  um  90  Grad  gedreht  und  im  DIN-A4- 
Format  ausgedruckt. 

Die  Routine  erkennt  den  Rechnertyp  und  paßt  sich  selb¬ 
ständig  an.  Da  auf  die  umständliche  Pixeltest-Abfrage  ver¬ 
zichtet  wurde,  arbeitet  das  Programm  sehr  schnell  und 
kann  jederzeit  mit  ESC  abgebrochen  werden. 

Anpassung  an  verschiedene  Drucker: 

Das  Programm  wurde  ursprünglich  für  den  Star  SG  10  ge¬ 
schrieben.  Folgende  Adressen  ermöglichen  eine  Anpas¬ 
sung  an  andere  Druckertypen  : 

&A09F 

CODE:  &1B  &4D  &0F  (ESC  ’  M"  15) 

Funktion:  Linken  Rand  auf  Spalte  15 

&A0A2 

CODE:  &1B  &41  &08  (ESC  ”A”  8) 

Funktion:  Zeilenabstand  8/72  Inch 
&A0A8 

CODE:  &1B  &67  &05  (ESC  ”g”  5) 

Funktion:  Grafikausdruck  mit  72  Pkt./Inch 
&A0AB 

CODE:  &90&01  (144  1) 

Funktion:  Es  folgen  1*256+144  Grafikbytes 
Der  Wert  &06  in  &A09E  und  der  Wert  &07  in  &A0A5  ge¬ 
ben  dem  Rechner  jeweils  an,  wieviel  Steuercodes  im  fol¬ 
genden  an  den  Drucker  geschickt  werden  müssen. 

Anpassungsbeispiele: 

EPSON  FX  85: 

51  POKE  &AOAO,&6C : POKE  &A0A9,&2A 
SEIKOSHA  SP-1000  CPC: 

51  POKE  &AOAO,&6C:POKE  &AOA9,&2A:POKE 
&A0AC.&02  (T.  Koch  mann/TM) 


10  REM  hardcopy  [947] 

20  SYMBOL  AFTER  256:MEMORY  &A000-1  [1742] 

30  FOR  i  =  &A00O  TO  &A0AC  [963] 

32  READ  x$:IF  x$="ab"  TH EN  x$="a0"  [2151] 

40  POKE  i,VAL("&"+x$)  [641] 

50  NEXT  [350] 

51  IF  PEEK( &AC0E } <  >&C9  THEN  POKE  &A01E,&C3  [9334] 
:POKE  &A0 1 F , &B7 : POKE  &A02A, &C4 : POKE  &A02B, 

&B7 : PRINT"664/61 28  Version"  ELSE  PRINT"464 
Version" 

60  PRINT : PRINT" j hardcopy": PRINT  [1887] 

70  CALL  &AOOO  [637] 

80  DATA  01  ,09, ab, 21 , 1 6 ,ab ,c3 ,d1 , bc  [1875] 

90  DATA  0e,ab,c3,1a,abf48,41  ,52, 44,43, 4f  (21 08  J 
100  DATA  50,d9,00,00,00,00,fe,00,c0  (18981 

110  DATA  3a,c8,b1 ,fe,01 ,c0,21 ,9e,ab,cd,7f ,  (18551 
ab 

120  DATA  2afc9,b1 ,11 ,4f ,c0,1 9 ,7c,e6,07  [1629  ] 

130  DATA  f6,c0,67,06,50,c5,e5,e5,21,a5,ab  [1429] 

140  DATA  cd,7f ,ab,e1 , 06 ,c8 , c5,e5 , 4e  [1572] 

150  DATA  06, 04, cb, 21 ,cb ,1 b,cb,3b,1 0 ,f8 , 06 ,  [2455] 
04 

160  DATA  cb,21 ,cb,1a,cb,3a,10,f8,7a  [1071] 

170  DATA  ab,4f,cb,21 ,a3 , 47 ,cb  ,20 , bl ,f5,7a,  [1854] 
b3 

180  DATA  bO, cd, 88, ab, fl , Cd, 88, ab, ei ,c1  [1133] 

190  DATA  cd, 26, bc, 10, cd, ei ,c1 ,cd,23,bc  [1774] 

200  DATA  10,ba,c9,46,23,7e,cd,88,ab  [2012] 

210  DATA  10,f9,c9,f5,97,cd,1b,bb,fe,ef ,28,  [2392] 


Wir  wissen  nicht,  wie  Sie  ohne  unsere  Produkte  leben 
können.  Daher  geben  wir  Ihnen  hiermit  die  Chance, 
Ihre  Lebenserwartung  stark  zu  erhöhen s 


MousePack :  Das  einzig  wahre  Waus-System  für  alle 
CPC's.  Kostenpunkt:  DM  228.-  inkl.  MwSt. 
TAIFUN:  Nach  wie  vor  der  einzig  ernstzunehmende 
_  BASIC-Compiler  für  das  SCHNEIDER-BASIC.  Für 
DM  124.90  bzw.  DM  139.90  (B64  +  6128)  gibt's 
die  40-fache  Geschwindigkeit. 

SuperPackBO:  DAS  professionelle  Assemblersystem  aus 
Macroassembler,  Reassembler  +  Monitor. 
Kass.:  DM  128.90  /  Disk.:  DM  141 .90 
Druckertreiber :  Drucken  in  18  verschiedenen  Schrift¬ 
arten  in  1000  Modifikationen  auf 
allen  Matrixdruckern.  Ab  DM  49.50  ! 
über  unser  ganzes  CPC-Programn  informiert  Sie  rnser 
kostenloser  Gesamtkatalog,  den  wir  Ihnen  auf  tele¬ 
fonische  oder  schriftliche  Anfrage  gerne  zusenden. 
GERDES ,  Imperial  SOFTware  Systems 

Heidegartenstr .  36  /  5300  Bonn  1 

Telefon:  0228  /  25  24  74 


MESSENEUHEITEN 


PIZIe-Data,  Inh.:  Hans-Jürgen  Plorreck 
Mittelstraße  61,  4322  Sprockhövel  2, 
Telefon  02339/7191 
Händleranfragen  erwünscht 
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Schneider  CRC  International 


Postfach  250,  3440  Eschwege 


STOP  -  Bitte  Bestellkarte  benutzen 


-  Das  ist  die  Software  zum  CPC  Magazin  - 
-  Jeden  Monat  neu  - 


Inhalt  der  Databox  zu  Heft  8/86 

Programm  464  664  6128 

Onwin's  Run  •  •  • 

Lokomotive  •  •  • 

Interrupt  Music  •  •  • 

Music  Demo  •  •  • 

Harucopy  Star  •  •  • 

Firmware  Erweiterung  •  •  • 

Paint  Master  •  •  • 

Reproduktion  •  •  • 

Game  ol  Eile  •  •  • 

Basic- Kurs  •  •  • 

Romsofl  NuraufEprom 

Rompatch  NuraufEprom 

V24  Tester  •  • 

Bonusprogram  rn  •  • 

Lister  11  ist  nur  auf  Diskette  erhältlich 
und  auch  aut  dem  Jovce  anwendbar. 


Für  alle  CPC’s  als  Kassette  und  3  "-Diskette. 

/  /  Auch  als  Abo  erhältlich!  \  \ 

DATABOX:  -  mehr  als  der  übliche  Softwareservice  X 

DATABOX:  -  bringt  ergänzend  sämtliche  Listings  der  jeweiligen  Zeitschrift  und  alle  Programmbeispiele  auf  Kassette 
oder  auf  3”-Diskette. 

DATABOX:  -  Programme  sind,  soweit  systembedingt  möglich,  auf  allen  drei  CPC -Model  len  lauffähig.  Einzelheiten 
entnehmen  Sie  bitte  der  nebenstehenden  Aufstellung. 

DATABOX:  -  erscheint  jeden  Monat  und  trägt  das  Titelbild  des  gleichzeitig  erscheinenden  Heftes. 

DATABOX:  -  der  Datenträger  zum  Schneider  CPC  International  enthält  außerdem  jedesmal  ein  zusätzliches 
Bonusprogramm,  das  nicht  im  Heft  abgedruckt  ist.  %  X 

Einzelbezug:  /  /  |  \ 

Einzelbezugspreise  für  DATABOX:  Diskette  3"  24,-  D\1  zuzüglich  3.-  DM  Porto/Verpackung  (im  Ausland  zuzüglich  5.-  DM  Porto/Verpackung). 
Kassette  14.-  DM  zuzüglich  Porto/Verpackung  (im  Ausland  zuzüglich  5,-  DM  Porto/Verpackung). 

Zahlungsweie:  Am  einfachsten  per  Yörkasse  (Verrechnungsscheck)  oder  als  Nachnahme  zuzüglich  der  Nachnahmegebühr  (in  das  Ausland  ist 
Nachnahme  nicht  möglich). ^ ~ J  ^ 


Preisvorteil  durch 
Databox-Abo 


er  Databox-Service  kann  ab  %ofort  auch  im  Abonne- 
ugen  werden.  Dadurch  sparen  Sie  Mühe  und  haben 
em  auch  noch  einen  Preisvorteil  gegenüber  dem  Einzel- 


Das  Databox-Abo  kostet: 

Als  Kassette  für  1/2  Jahr  (6  Lieferungen) 

Im  Inland  und  West-Berlin  90.-  DM 
Im  europäischen  Ausland  100,-  DM 
Im  außereuropäischen  Ausland  120,-  DM 

Als  Diskette  für  1/2  Jahr  (6  Lieferungen) 

Im  Inland  und  W  est-Berlin  150,-  DM 
Im  europäischen  Ausland  160,-  DM 
Im  außereuropäischen  Ausland  180.-  DM 

Als  Kassette  für  I  Jahr  (12  Lieferungen) 

Im  Inland  und  West-Berlin  180,-  DM 
Im  europäischen  Ausland  200,-  DM 
Im  außereuropäischen  Ausland  240,-  DM 
Als  Diskette  für  I  Jahr  (12  Lieferungen) 

Im  Inland  und  West-Berlin  300,-  DM 
Im  europäischen  Ausland  320,-  DM 
Im  außereuropäischen  Ausland  360.-  DM 
In  den  vorgenannten  Preisen  sind  die  Versand-  und 
kosten  enthalten.  Bitte  benutzen  Sie  für  Ihre  Best 
Karte. 


Auch  weiterhin  erhältlich  die  Programm-Highlights  aus  den  ver¬ 
griffenen  Heften  3/85  bis  7/85.  Den  Inhalt  dieser  Kassetten  ent¬ 
nehmen  Sie  bitte  der  folgenden  Aufstellung 

Inhalt  von  Highlights  1 

Spiele:  i.  Smiley  und  die  Grumpies.  2.  Bücherwurm,  3.  Solitaire, 
4.  Reaktionstest.  Tips  &  Tricks:  5.  Restore,  6.  Head  Reader, 
7.  Window,  8.  An  die  Freude,  9.  Orgelstimmer,  10.  Mergefix. 

11.  Notizblatt,  12.  Data  Wandler,  13.  Circle.  Anwendungen: 
14.  3D-Darstellung,  15.  Adressverwaltung,  16.  Screen  Dump. 

Inhalt  von  Highlights  2 

Spiele:  1 .  Laser  Battle.  2.  Partnertest.  Tips  &  Tricks:  3.  Scroller, 
4.  Laufschrift,  5.  Bildschirmbewegungen,  6.  Profile,  7.  Textrou¬ 
tinen,  8.  Baudrate,  9.  Zeitdifferenz.  10.  Dezimalpunkt,  1 1.  Buffer. 

12.  High-Score.  Anwendungen:  13.  Mini  Spreadsheet,  14.  Kur¬ 
vendiskussion,  15.  Vokabelprogramm. 


Viel  Software  zum  günstigen  Preis! 

Databox  Highlights  erhalten  Sie,  ebenso  wie  die  aktuellen 
Databox-Kassetten,  für  14.-  DM/Stück,  zuzüglich  3,-  DM 
Porto  und  Verpackung. 


Tips  &  Tricks 


09 

220  DATA  cd,2e,bd,38,f4,f1 ,c3,2b,bd  [15491 

230  DATA  31  ,f8,bf  ,c9 , 06 , 1 b, 4d , Of  ,1b, 41  ,08  [1447  ) 

240  DATA  07,0d,0a,1b,67,05,90,01  [13831 

F  i  r  m  wa  re-  E  rwe  1 1  e  r  u  n  g 
für  464-664-6 1 18  U| 

Folgende  kleine  Routinen  stellen  Assemblerprogrammie¬ 
rern  ein  wertvolles  Hilfsmittel  bei  der  Entwicklung  von 
Anwenderprogrammen  zur  Verfügung.  Die  Ein-  und  Aus¬ 
gabe  von  Hexzahlen  stellen  ein  nicht  geringes  Problem 
dar. 

Eine  genaue  Beschreibung  der  neuen  Calls  linden  Sie  in 
der  Mini-Referenz.  Die  Input-Routine  verträgt  nur  Groß¬ 
buchstaben  und  kann  mit  ”ESC”  wieder  verlassen  wer¬ 
den.  (TM) 

10  DATA  &3E, &26 , &CD , &5A , &BB, &CD, &81  , &BB, &C  14368) 
D,  &06 , &BB , &FE , &FC , &C8 , &FE, &2F , &DA, &58 , &A0 , 

&FE,  3228 

20  DATA  &3A, &D2 , &D9 , &A0 , &CD, &5A, &BB, &FE ,  &3  [51501 
A, &D2 , &C1 , &A0 , &D6 ,X30,&07,&07,&07,&07,  &E6 , 

&F0,  2762 

30  DATA  &F5 , &CD ,  &81  , &BB, &CD, &06 , &BB, &FE, &F  [48261 
C, &C8 , &FE , &2F, &DA , &7C f &A0 , &FE ,  &  3  A , &D2 , SEI  , 

&A0,  3580 

40  DATA  &CD, &5A,  &BB , &FE, &3A, &D2 , &C6 , &A0 , SD  [5379) 

6 , &30 , &E6 , &GF, SCI , SB0 , &C9 , &F5 , &3E, &26 , &CD , 

&5A,  3079 

50  DATA  SBB,SF1 , SF5 , S0F, &0F, S0F, S0F, «E6 , SO  [4308) 
F, &FE ,  S0A , &D2 , &CB , &A0 , &C6 ,  &30 , SCD , S5A, SBB , 

&F1,  2784 

60  DATA  SE6,S0F,SFE,&0A,SD2,SD3,SA0,«C6,S3  [43451 
0 , SCD , &5A, SBB , SC9 , &D6 , &37 , &C3 ,&72, SA0 , &D6 , 

S37,  3026 

70  DATA  SC3 , &96 , &A0 , &C6 ,  &37 , SCD, S5A, SBB, SC  [45061 
3 , &B3 , &A0 , &C6 ,  S37 , SCD f  &5A, SBB , &C9 , SFE, &41  , 

&D2,  3239 

80  DATA  &E9 , &A0 , &C3 , S58 , &A0 , &FE, &41 , &D2 ,  SF  [34271 
1  , &A0 , &C3 , &7C ,  &A0 , SFE , S47 , SD2 , «58 , &A0 , SC3 , 

S68 ,  3327 

90  DATA  SAQ , SFE  ,  S47 , SD2 ,  S7C, SA0 ,  SC3 , S8C, SA  [1996] 
0,S00,  1474 


100  dat=0  :  sz=0  :  dz  =  1 0  13191 

110  FOR  adr  =-24496  TO-24327  [11423 

120  READ  byte  :  dat=dat+1  [956] 

130  sz=sz+byte  [6191 

140  POKE  adr, byte  184) 

150  IF  dat  <  20  AND  adr  <  -24327  TUEN  19  [12163 

0 

160  READ  chksum  [1222] 

170  IF  chksum <  >sz  THEN  PRINT  "Fehler  in  [3056] 

Zeile  :";dz 

180  dz=dz  +  10  :  sz=0  :  dat=0  [843] 

190  NEXT  adr  [5471 

200  END  (110) 


Firmware-Beschreibung: 


Adresse:  &A050 
Aufgabe/Wirkung: 

H  i  nspru  ngsbed  ingu  ngen : 
Übergabeparameier  beim  Aussprung: 
Anmerkungen: 


Zahlenabfrage  und  Wartefunklion  (lnput  Hex) 

Ein  "&”-Zeichen  wird  ausgegeben  und  eine  8-Bit-Zahl 

wird  als  Hex-Zahl  abgefragl 

keine 

A  enthält  Wert 
keine 


Adresse:  &A055 
Au  fgabe/Wi  rku  ng: 

Einsprungsbedingungen: 
Übergabeparanieter  beim  Aussprung: 
Anmerkungen: 


Zahlenabfrage  und  W'arlefunklion  (Input  Hex) 

Wie  bei  42500,  nur  daß  kein  "&”-Zeichen  ausgegeben 


wird 

keine 

A  enthält  Wert 
keine 


Adresse:  &A09B 
Aufgabe/Wirkung: 

Einsprlingsbedingungen: 
Übergabeparameter  beim  Aussprung: 
Anmerkung: 


Zahlenausgabe  (Output  Hex) 

Gibt  A  als  Ilex-Zabl  aufdem  Bildschirm  aus;  sie  wird  durch 
ein  "&"-Zeichen  gekennzeichnet 
A  muß  den  auszugebenden  Wert  enthalten 
keine 

A  wird  zerstört 


Adresse:  &A0A2 
Aufgabe/Wirkung. 

Ein  Sprungsbedingungen: 
Übergabeparameter  beim  Aussprung: 
Anmerkung: 


Zahlenausgabe  (Output  Hex) 

Gibt  A  als  Hex-Zahl  am  Bildschirm  aus;  sie  wird  nicht 
durch  ein  "^.  '-Zeichen  gekennzeichnet 
wie  bei  42543 
keine 

A  wird  zerstört 


8  ’86  CPC  87 


Assemblerkurs 


Befehle  zur  Einzelbitverarbeitung: 

Es  kann  sehr  nützlich  sein,  wenn  man 
mit  einem  einzigen  Befehl  ein  belie¬ 
biges  Bit  in  einem  beliebigen  Register 
setzen  oder  zurücksetzen  kann.  Diese 
Möglichkeit  beansprucht  eine  sehr 
große  Zahl  von  OP-Codes  und  steht 
deshalb  bei  den  meisten  Mikroprozes¬ 
soren  nicht  zur  Verfügung.  Der  Z-80 
jedoch  ist  mit  ausgiebigen  Möglich¬ 
keiten  zur  Bitmanipulation  ausgerü¬ 
stet. 

Hauptsächlich  gibt  es  drei  Möglich¬ 
keiten: 

1.  Bit  testen  (BIT  ...) 

Wird  ein  Befehl  zum  Testen  eines  Bits 
ausgeführt,  so  enthält  nach  Ausfüh¬ 
rung  des  Befehls  das  Zero-Flag  das 
Komplement  des  getesteten  Bits. 

2.  Bit  setzen  (SET  ...) 

Nach  Ausführung  des  Befehls  ist  das 
angesprochene  Bit  gesetzt. 

3.  Bit  löschen  (RES  ...) 

Nach  Ausführung  des  Befehls  ist  das 
angesprochene  Bit  gelöscht. 
Grundsätzlich  gibt  es  hierbei  zwei 
Arten  von  Operanden: 

1.  Welches  Bit  ist  gemeint? 

Hier  muß  eine  Zahl  zwischen  0  und  7 
angegeben  werden. 

2.  Wo  ist  dieses  Bit? 

Hierbei  gibt  es  mehrere  Möglichkei¬ 
ten,  die  auch  zur  Ausführung  unter¬ 
schiedliche  Zeiten  benötigen.  Sie 
sind  jedoch  bei  allen  drei  Arten  der 
Bitmanipulation  gleich,  so  daß  ich 
mich  darauf  beschränke,  die  Bit- 
Befehle  (teste  Bit)  zu  erklären.  Wird 
bei  SET  oder  RES  auf  Speicherberei¬ 
che  zugegriffen,  so  müssen  3  Taktzy¬ 
klen  zur  Ausführungszeit  addiert  wer¬ 
den. 

Bit  b,r 

b  ist,  wie  unter  1.  schon  erklärt,  eine 
Zahl  zwischen  0  und  7,  wobei  die  7 
das  höchstwertige  Bit  darstellt, 
r  ist  ein  Einzelregister  A,  B,  C,  D,  E,  H 
oder  L. 

Die  Ausführungszeit  beträgt  8  Takt¬ 
zyklen. 

Bit  b,[HL] 

b  ist,  wie  unter  1.  schon  erklärt,  eine 
Zahl  zwischen  0  und  7,  wobei  die  7 
das  höchstwertige  Bit  darstellt. 

[HL]  bedeutet,  wie  Ihnen  sicher 
schon  von  anderen  Befehlen  her  be¬ 
kannt  sein  dürfte;  die  Zahl  in  HL  wird 
als  Adresse  interpretiert  und  dieses 
Byte  wird  dann  entsprechend  behan¬ 
delt. 

Die  Ausführungszeit  beträgt  12  Takt¬ 
zyklen. 

Bit  b,{IX+d] 

b  ist,  wie  unter  1.  schon  erklärt,  eine 
Zahl  zwischen  0  und  7,  wobei  die  7 
das  höchstwertige  Bit  darstellt. 

IX  wird  wie  in  [HL]  als  Adresse 
interpretiert.  Dazu  wird  allerdings 


der  8-Bit-Wert  d  addiert.  Die  dadurch 
entstehende  Adresse  ist  dann  der 
Operand. 

Die  Ausführungszeit  dauert,  wie  bei 
allen  Index-Befehlen,  relativ  lange  - 
?Ö  Taktzyklen. 

Bit  b,[IY+d] 

Dies  ist  im  Prinzip  der  gleiche  Befehl, 
allerdings  wird  statt  des  IX-Registers 
das  IY-Register  zur  Indizierung  be¬ 
nutzt. 

Die  Ausführungszeit  ist  ebenfalls  20 
Taktzyklen. 

Die  CPU-Steuerbefehle: 

CCF 

Mit  Hilfe  dieses  Befehls  läßt  sich  das 
Carry-,  auch  Übertragsflag  genannt, 
komplementieren.  Die  Ausführungs¬ 
zeit  dauert  4  Taktzyklen. 

SCF 

Dieser  Befehl  setzt  das  Übertragsflag. 
Die  Ausführung  dauert  ebenfalls  nur 
4  Taktzyklen. 

NOP 

Ein  Befehl,  den  die  meisten  Prozesso¬ 
ren  kennen.  Er  bedeutet  "No  Ope¬ 
ration",  und  wie  der  Name  schon  an¬ 
deutet,  hat  dieser  Befehl  keine 
Funktion.  Er  wird  meist  beiÄnderun- 
gen  angewandt,  um  freiwerdende  By¬ 
tes  keiner  Funktion  auszusetzen, 
oder  bei  zeitkritischen  Anwendun¬ 
gen  entsprechend  zu  verweilen.  Die 
Ausführungszeit  dieses  nichts  machen¬ 
den  Befehls  dauert4  Taktzyklen  (eine 
Interpretationszeit  ist  immer  notwen¬ 
dig). 

HALT 

Auch  dieser  Befehl  läßt  sich  einfach 
erklären.  Die  CPU  wird  zum  Still¬ 
stand  gebracht  -  der  Name  deutet  es 
ja  schon  an.  Sie  wird  erst  wieder  aktiv, 
wenn  ein  Interrupt  (INT  oder  NMI) 
oder  der  RESET-Eingang  der  CPU 
aktiv  wird. 

(Für  Systemprogrammierer:  Die  Durch- 
führung  der  Speicherrefreshs  ist  ge¬ 
währleistet,  da  im  Haltzustand  NOP- 
Befehle  ausgeführt  werden.) 

DI  und  EI 

DI  (disable  Interrupt)  verhindert  die 
Ausführung  eines  maskierten  Inter¬ 
rupts. 

EI  (enable  Interrupt)  gibt  diese  Sperre 
wieder  frei. 

Jeder  der  beiden  Befehle  benötigt  4 
Taktzyklen  zur  Ausführung. 

IM  d 

d  ist  eine  Zahl  zwischen  0  und  2.  Die¬ 
ser  Befehl  steuert  die  verschiedenen 
Interrupt-Betriebsarten.  Die  Ausfüh¬ 
rung  dieses  Befehls  dauert  8  Takl- 
zyklen. 

0  -  in  dieser  Betriebsart  kann  die 
unterbrechende  Peripherie  hardwa¬ 
remäßig  beliebige  Anweisungen  auf 
den  Datenbus  legen,  die  dann  von  der 
CPU  ausgeführt  werden. 


1  -  in  dieser  Betriebsart  führt  die  CPU 
einen  Restart-Befehl  zu  der  Speicher¬ 
stelle  56  dezimal  aus. 

2  -  in  dieser  Betriebsart  ist  ein  Spei¬ 
cher-indirekt  arbeitender  Betriebs¬ 
routinenaufruf  möglich,  wobei  die 
angesprungene  Bedienroutine  in  je¬ 
dem  beliebigen  Bereich  des  64  Kilo¬ 
byte  großen  Arbeitsspeicher  begin¬ 
nen  kann. 

Sprungbefehle: 

JP  nn 

Dies  ist  ein  einfacher  Jump.  Es  ist 
damit  möglich,  zu  jeder  Speicher¬ 
stelle  im  gesamten  64K-Bereich  des 
Z-80  zu  springen.  Jedoch  muß  die 
Adresse  natürlich  als  16-Bit-Wert  ab¬ 
gelegt  sein,  und  das  kostet  Speicher¬ 
platz. 

Die  Ausführung  dauert  10  Taktzy¬ 
klen. 

JP  b,nn 

Dies  ist  ein  bedingter  Sprung.  Je  nach 
Stand  der  Flags  wird  entweder  zu  der 
angegebenen  Adresse  gesprungen 
oder,  falls  die  Bedingung  nicht  zu¬ 
trifft,  der  Sprungbefehl  wird  igno¬ 
riert.  Man  könnte  es  mit  folgender 
BASIC-Anweisung  vergleichen: 

1200  IF  FLAG=0  THEN  1000 
b  ist  eine  Bedingung: 

NZ  -  nicht  Null 
Z  -  Null 

NC  -  kein  Übertrag 
C  -  Übertrag 
PO  -  gerade  Parität 
PE  -  ungerade  Parität 
P  -  Vorzeichen  positiv 
M  -  Vorzeichen  negativ 
nn  ist  eine  16-Bit-Adresse. 

Die  Ausführungszeit  dauert  10  Takt¬ 
zyklen. 

JR  n 

Dies  ist  ein  relativer  unbedingter 
Sprung.  Die  Sprungweiten  wird  zum 
momentanen  Stand  des  Be¬ 
fehlszählers  addiert  (im  Zweierkom¬ 
plement)  und  ermöglicht  so  einen 
Sprung  im  Bereich  zwischen  - 126  und 
+  129  Bytes.  Er  dauert  in  seiner  Aus¬ 
führung  12  Taktzyklen,  also  trotz  kür¬ 
zeren  OP-Codes  längere  Aus¬ 
führungszeit.  Von  Vorteil  ist  aber,  daß 
ein  Programm,  das  nur  den  JR  als 
Sprungbefehl  benutzt,  frei  verschieb¬ 
bar  bleibt. 

JR  b,n 

Dieser  Befehl  erlaubt  einen  relativen 
Sprung  um  n  Bytes  mit  der  Bedin¬ 
gung  b.  Die  Sprungweite  liegt  im  Be¬ 
reich  zwischen  -126  und  +129 
Bytes. 

b  ist  eine  Bedingung: 

NC  -  kein  Übertrag 
C  -  Übertrag 
NZ  -  nicht  Null 
Z  -  Null 

Die  Ausführungszeit  beträgt  bei 
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zutreffender  Bedingung,  bei  einer 
Sprungausführung  also,  12  Taktzy- 
klen.  Sollte  die  Bedingung  jedoch 
nicht  zutreffen,  nur  7  Taktzyklen. 

JP  [nn] 

Der  Inhalt  des  Doppelregisters  nn 
wird  als  Adresse  interpretiert.  Dahin 
führt  dann  auch  der  Sprung, 
nn  kann  sein: 

HL  -  Ausführungszeit  4  Taktzyklen 
IX  -  8  Taktzyklen 
IY  -  8  Taktzyklen 

DJNZ  n 

Dies  ist  ein  Schleifenbefehl,  der  sehr 
häufig  Verwendung  findet.  Bei  jedem 
Erreichen  des  Befehls  wird  der  Inhalt 
des  Registers  B  um  1  erniedrigt.  Nun 
wird  geprüft,  ob  B  den  Wert  0  erreicht 
hat.  Sollte  dies  nicht  der  Fall  sein,*so 
wird  zu  der  angegebenen  Adresse  ge¬ 
sprungen.  Andernfalls  wird  die  Sprung¬ 
anweisung  ignoriert. 

Beispiel: 

LD  B.80; 

Schleifenanzahl  festlegen 
LOOP1  CALL  AUSGAB; 

Aufruf  eines  beliebigen  Unterpro¬ 
grammes 
DJNZ  LOOP1; 

Ende  der  Schleife 

Gewiß  erkennen  Sie  Ähnlichkeiten 
mit  einer  BASIC  "FOR-NEXT".  Die 
Ausführungszeit  beträgt  15  Taktzy¬ 
klen,  wenn  die  Schleife  ausgeführt 
wird,  und  8  Taktzyklen,  falls  sie  nicht 
ausgeführt  wird. 

CALI,  nn 

Dies  ist  ein  Unterprogrammaufruf, 
ähnlich  einem  "GOSUB"  in  BASIC. 
Bei  Erreichen  dieses  Befehls  wird 
zuerst  der  aktuelle  Befehlszähler¬ 
stand  (Inhalt  des  PC-Registers)  auf 
den  Stapel  gerettet.  Dies  geschieht  in 
zwei  Phasen  (eine  Adresse  sind  16 


Bits).  Anschließend  wird  die  Adresse 
nn  angesprungen. 

Die  bei  nn  beginnende  Subroutine 
muß  durch  "RET"  abgeschlossen 
sein.  Dieser  Befehl  restauriert  den  Be¬ 
fehlszähler  aus  dem  Stack  wieder  auf 
die  nächste  Adresse  des  Hauptpro¬ 
grammes. 

Die  Ausführungszeit  dauert  17  Takt¬ 
zyklen. 

CALL  b,nn 

Ein  bedingter  Unterprogrammauf- 
ruf.  Trifft  die  Bedingung  b  zu,  so  wird 
der  Sprung  ausgeführt  und  dauert  17 
Taktzyklen,  andernfalls  wird  der 
Unterprogrammaufruf  ignoriert  und 
dauert  nur  10  Taktzyklen, 
b  kann  sein: 

NZ  -  nicht  Null 
Z  -  Null 

NC  -  kein  Übertrag 
C  -  Übertrag 
PO  -  gerade  Parität 
PE  -  ungerade  Parität 
P  -  Vorzeichen  positiv 
M  -  Vorzeichen  negativ 
RSTn 

Dies  ist  ebenfalls  ein  Unterprogramm¬ 
aufruf.  Er  kann  allerdings  nur  dazu 
benutzt  werden,  bestimmte  Adressen 
anzuspringen.  Er  ist  in  seiner  Aus- 
führungszeit  mit  1 1  Taktzyklen  wesent¬ 
lich  schneller  als  ein  "CALL".  Dies  ist 
bedingt  durch  seinen  nur  1  Byte  gro¬ 
ßen  OP-Code. 
n  kann  sein: 

00  H 
08  H 
10H 
18H 
20H 
28  H 
30H 
38H 


n  ist  dan  n  gleichzeitig  die  Adresse  des 
Unterprogramms. 

RET 

Mit  RET  wird  ein  Unterprogramm 
abgeschlossen.  Die  beiden  obersten 
Werte  des  Stacks  werden  in  das  PC- 
Register  zurück  kopiert.  Die  Aus¬ 
führungszeit  dauert  10  Taktzyklen. 
RET  b 

Mit  RET  b  ist  ein  bedingter  Rück¬ 
sprung  aus  einer  Subroutine  möglich. 
Ist  b  erfüllt,  so  erfolgt  ein  normaler 
Rücksprung.  Andernfalls  wird  der 
Befehl  ignoriert.  Die  Ausführung 
dauert  mit  Rücksprung  11,  sonst  5 
Taktzyklen, 
b  kann  sein: 

NZ  -  nicht  Null 
Z  -  Null 

NC  -  kein  Übertrag 
C  -  Übertrag 
PO  -  gerade  Parität 
PE  -  ungerade  Parität 
P  -  Vorzeichen  positiv 
M  -  Vorzeichen  negativ 
RETI 

Dieser  Befehl  bedeutet  "Return  from 
Interrupt”.  Ein  Interrupt  ist  so  etwas 
ähnliches  wie  ein  Unterprogramm¬ 
aufruf.  Er  funktioniert  allerdings 
etwas  komplizierter.  Zwei  Aufgaben 
werden  durch  RETI  erfüllt: 

1.  Der  Programmzähler  wird  analog 
zu  RET  restauriert. 

2.  Dem  Peripheriebaustein,  der  den 
INT  anmeldete,  wird  das  Ende  seiner 
zugehörigen  Routine  mitgeteilt  Die¬ 
ser  Baustein  gibt  daraufhin  die  von 
ihm  blockierte  DAISY-CHAIN  wie¬ 
der  frei  und  ermöglicht  damit  die  Ab¬ 
arbeitung  niederwertiger  INTs.  Dar¬ 
über  hinaus  wird  das  IFF2-  in  das 
IFFl-Flip-Flop  kopiert. 


CPC  Sonderaktion 


Aus  Restbeständen  des  Jahrgangs 
1985  sind  noch  die  Ausgaben 

8/85,  10/85,  11/85  und  12/85 

verfügbar. 

Diesen  Restposten-Pack  können  Sie  im 
Paket  zum  günstigen  Gesamtpreis  von 
nur  DM  12»-  (Ausland  DM  15»-) 
beziehen  (ind.  Porto  und 
Verpackung)  • 


Angebot  solange 


Die  bisher  erschienenen  Sonderhefte 
sowie  sämtliche  Ausgaben  des 
Jahrgangs  1988  und  die  zugehörigen 
Databoxen  können  ebenfalls  über  den 
Verlag  nachbestellt  werden. 
Bitte  benutzen  Sie  die  Bestellkarte 
im  Heft! 
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. Kurse1 


min 


iiiiiiimmiii 


1 1 1 1 1 1 1 1 


Beachten  Sie  jedoch,  daß  durch  die 
RETI-Anweisung  der  maskierbare 
Interrupt  nicht  freigegeben  wird.  Da¬ 
her  sollte  grundsätzlich  vor  jedem 
RETI-Aufruf  ein  EI-Befehl  stehen, 
der  die  Annahme  später  folgender 
Interruptanforderungen  ermöglicht. 
Die  Ausführung  dauert  übrigens  14 
Taktzyklen. 

RETN 

RETN  wird  zur  Rückkehr  aus  einer 
Unterroutine  verwendet,  die  durch 
einen  nicht  maskierbaren  Interrupt 
(NMI)  aufgerufen  wurde.  RETN  ist  in 
seiner  Wirkung  vollkommen  identisch 
zum  Befehl  RET,  zusätzlich  wird  je¬ 
doch  das  IFF2-Flip-Flop  in  das  IFF1- 
Flip-Flop  kopiert,  so  daß  die  Bearbei¬ 
tung  maskierbarer  Interruptanforde¬ 
rungen  unmittelbar  nach  Ausfüh¬ 
rung  des  RETN-Befehls  freigegeben 
ist,  falls  sie  bereits  vor  Auftreten  der 
NMI-Anforderung  freigegeben  war. 
Die  Ausführung  dauert  ebenfalls  14 
Taktzyklen. 

Ein-  und  Ausgabebefehle; 

IN  A,[n] 

Der  Operand  n  belegt  die  untere 
Hälfte  des  Adressbusses  (AO  bis  A7) 
und  wählt  eine  I/O-Schnittstelle  mit 
der  Adresse  n  aus.  Der  Inhalt  vom 
Akkumulator  belegt  gleichzeitig  die 
obere  Adresshälfte  (A8  bis  A15).  An¬ 
schließend  wird  ein  Byte  der  gewähl¬ 
ten  I/O- Schnittstelle  auf  den  Daten¬ 
bus  übernommen  und  in  den  Akku¬ 
mulator  transferiert.  Die  Ausführung 
dieses  Befehls  dauert  11  Taktzyklen. 
IN  r,[C] 

Der  Inhalt  des  Registers  C  erscheint 
auf  der  unteren  Adresshälfte  (AO  bis 
A7),  Register  B  auf  der  oberen  (A8  bis 
A15).  Die  durch  den  Inhalt  des  C- 
Registers  adressierte  Schnittstelle  lie¬ 
fert  das  in  ihr  enthaltene  Byte  über 
den  Datenbus  in  das  gewünschte  Re¬ 
gister  r.  Diese  Befehlsausführung 
dauert  12  Taktzyklen. 

INI 

Die  Schnittstelle,  deren  Adresse  in  C 
enthalten  ist,  wird  abgefragt.  Ihr 
Inhalt  gelangt  über  den  Datenbus  in 
jene  Speicherstelle,  deren  Adresse  in 
HL-Register  enthalten  ist.  Anschlie¬ 
ßend  wird  der  Inhalt  von  HL  inkre- 
mentiert.  Das  Register  B  wird  dekre- 
mentiert. 

Also: 

(HL)  —  (C) 

B  —  B-l 
HL  _  HL+1 

Die  Ausführung  dieses  Befehls 
dauert  16  Taktzyklen. 

INIR 

Mit  diesem  Befehl  kann  eine  fortlau¬ 
ende  Dateneingabe  über  eine  Schnitt¬ 


stelle,  deren  Adresse  in  C  steht, 
durchgeführt  werden.  Die  Anzahl  der 
zu  übernehmenden  Bytes  wird  mit  B 
festgelegt.  Die  Startadresse  des  Da¬ 
tenblocks  ist  durch  den  Inhalt  von 
HL  gegeben. 

Die  Ausführungszeit  dauert,  wenn  B 
=0,  16  Taktzyklen,  wenn  B  <>  0,  21 
Taktzyklen. 

Also: 

INIR  ist  eine  fortlaufende  Aktion  des 
INI-Befehls.  Die  gesamten  Operatio¬ 
nen  des  INI-Befehls  werden  so  lange 
durchgeführt,  bis  der  Inhalt  des  B- 
Registers  gleich  Null  ist.  Ist  B 
<>  0,  wird  der  Programm-Counter 
um  zwei  erniedrigt  und  der  INI- 
Befehl  erneut  durchgeführt.  Interrupt¬ 
anforderungen  werden  nach  jedem 
Datentransfer  angenommen.  Außer¬ 
dem  werden  zwei  Refresh-Zyklen 
ausgesandt. 

IND 

IND  entspricht  in  seiner  Funktion  dem 
INI-Befehl,  mit  dem  Unterschied,  daß 
nach  Dateneingabe  dekrementiert  an¬ 
statt  inkrementiert  wird. 

Also: 

(HL) «-  (C) 

B  «-  B-l 
HL  -  HL-1 

Die  Ausführungszeit  dauert  16  Takt¬ 
zyklen. 

INDR 

Der  Befehl  INDR  entspricht  dem 
IND-Befehl.  Allerdings  wird  er  so  oft 
wiederholt,  solange  Register  B  un¬ 
gleich  Null  ist.  Die  Ausführungszeit 
bei  B=0  beträgt  16  Taktzyklen,  bei 
B<>  0  21  Taktzyklen. 

OUT  [n],A 

Der  Operand  n  belegt  die  untere 
Hälfte  des  Adressbusses  (AO  bis  A7) 
und  wählt  eine  I/O-Schnittstelle  mit 
der  Adresse  n  aus.  Der  Inhalt  vom 
Akkumulator  belegt  die  obere 
Adresshälfte  (A8  bis  Al 5).  An¬ 
schließend  wird  ein  Byte  aus  dem 
Akku  auf  die  gewählte  I/O-Schnitt¬ 
stelle  auf  den  Datenbus  übergeben. 
Die  Ausführung  dieses  Befehls 
dauert  1 1  Taktzyklen. 

OUT  [C],r 

Der  Inhalt  des  Registers  C  erscheint 
auf  der  unteren  Adresshälfte  (AO  bis 
A7),  Register  B  auf  der  oberen  (A8  bis 
Al  5).  Auf  die  durch  den  Inhalt  des  C- 
Registers  adressierte  Schnittstelle 
wird  der  Wert  des  Registers  r  ausgege¬ 
ben.  Diese  Befehlsausführung  dauert 
12  Taktzyklen. 

OUTI 

Der  Inhalt  des  Doppelregisters  HL 
wählt  eine  Speicheradresse,  deren  In¬ 
haltwird  über  die  Schnittstelle,  deren 
Adresse  in  C  enthalten  ist,  ausgege¬ 
ben.  Nach  Übernahme  des  Inhalts 
der  Zelle  in  die  CPU,  wird  der  Byte¬ 


zähler  B  dekrementiert.  Anschlie¬ 
ßend  gelangt  der  Inhalt  von  C  auf  die 
untere,  der  von  B  auf  die  obere 
Adressbushälfte.  Der  zwischenge¬ 
speicherte  Inhalt  der  Speicherzelle 
wird  nun  auf  den  Datenbus  gebracht 
und  über  die  ausgewählte  Schnitt¬ 
stelle  ausgegeben.  Danach  wird  das 
Registerpaar  HL  inkrementiert. 

Also: 

(C)  -  (HL) 

B  _  B-l 
HL  —  HL+1 

Die  Ausführung  dieses  Befehls 
dauert  16  Taktzyklen. 

OTIR 

Mit  diesem  Befehl  kann  eine  fortlau¬ 
fende  Dateneingabe  über  eine  Schnitt¬ 
stelle,  deren  Adresse  in  C  steht, 
durchgeführt  werden.  Die  Anzahl  der 
zu  übernehmenden  Bytes  wird  mit  B 
festgelegt.  Die  Startadresse  des  Da¬ 
tenblocks  ist  durch  den  Inhalt  von 
HL  gegeben. 

Die  Ausführungszeit  dauert,  wenn 
B=0,  16  Taktzyklen,  wenn  BO  0, 21 
Taktzyklen. 

Also: 

OTIR  ist  eine  fortlaufende  Aktion  des 
OUTI-Befehls.  Die  gesamten  Opera¬ 
tionen  des  OUTI-Befehls  werden  so 
lange  durchgeführt,  bis  der  Inhalt  des 
B-Registers  gleich  Null  ist.  Ist  B  <>  0, 
wird  der  Programm-Counter  um  zwei 
erniedrigt  und  der  OUTI-Befehl  er¬ 
neut  durchgeführt.  Interruptanfor¬ 
derungen  werden  nach  jedem  Daten¬ 
transfer  angenommen.  Außerdem 
werden  zwei  Refresh-Zyklen  ausge¬ 
sandt. 

OUTD 

OUTD  entspricht  in  seiner  Funktion 
dem  OUTI-Befehl,  mit  dem  Unter¬ 
schied,  daß  nach  Datenausgabe 
dekrementiert  anstatt  inkrementiert 
wird. 

Also: 

(C)  <—  (HL) 

B  -  B-l 
HL  -  HL-1 

Die  Ausführungszeit  dauert  16  Takt¬ 
zyklen. 

OTDR 

Der  Befehl  OTDR  entspricht  dem 
OUTD-Befehl.  Allerdings  wird  er  so 
oft  wiederholt,  solange  Register  B  un¬ 
gleich  Null  ist.  Die  Ausführungszeit 
bei  B=0  beträgt  16  Taktzyklen,  bei 
B<>  0  21  Taktzyklen. 

Ich  hoffe,  daß  Ihnen  unser  Assem¬ 
blerkurs  gefallen  hat  und  daß  Sie  aus 
der  Zusammenfassung  aller  regulä¬ 
ren  Z-80-Befehle  Nutzen  ziehen  wer¬ 
den.  Ich  möchte  mich  noch  für  Ihre 
Aufmerksamkeit  bedanken  und  wün¬ 
sche  fröhliches  Assemblerprogram¬ 
mieren.  (HF) 
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COPYPIC 

LOGO-Grafik  schwarz  auf  weiß 

Leider  bietet  die  Programmiersprache  LOGO  keine  Mög¬ 
lichkeit,  ein  erstelltes  ”Bild”  auf  dem  Drucker  auszugeben. 
Die  durch  gleichzeitiges  Drücken  der  EXTRA-  und  PTR- 
Taste  ausgelöste  Hardcopy-Funktion  bringt  naturgemäß  den 
gesamten  aktuellen  Bildschirm  inhalt  auf  das  Papier,  und  dies 
in  einem  vergleichsweise  kleinen  Format. 

Mit  COPYPIC  kann  man  nun  LOGO-Grafiken  in  einem 
größeren  Format  auf  den  Drucker  ausgeben.  Da  die  Anzahl 
der  Kopfzeilen  und  der  Rand  unter  Programmkontrolle  ein¬ 
stellbar  sind,  lassen  sich  LOGO-Grafiken  auch  in  Loco- 
Script-Texte  ”einbinden”. 

LOGO  und  seine  Bilder 

Wie  aus  dem  "mageren”  LOGO-Teil  des  Joyce-Benutzer- 
handbuches  zu  entnehmen  ist,  wird  das  gerade  auf  dem 
Schirm  gezeigte  Bild  mit  dem  Befehl  savepic  ”name  in  die 
Datei  name  auf  Diskette  gespeichert.  Wer  schon  einmal 
mit  DIR  [SIZEJ  unter  CP/M  seine  LOGO-Dateien  begut¬ 
achtet  hat,  wird  bemerkt  haben,  daß  jedes  auch  noch  so 
kleine  Bild  volle  23  kByte  Speicherplatz  verbraucht.  (An¬ 
merkung  für  "Neulinge":  bei  dem  DIR-Befehl  muß  statt 
den  eckigen  Klammern  das  große  Ä  für  Klammer  auf  bzw. 
das  große  Ü  für  Klammer  zu  verwendet  werden.)  Wer 
nachrechnet,  hat  schnell  die  Lösung:  Die  Auflösung  des 
Joyce-Monitors  beträgt  720  x  256  Punkte  (Spalten  x  Zei¬ 
len).  Das  macht  184320  Punkte,  oder  Pixel,  wie  die  Einge¬ 
weihten  einen  Punkt  auf  dem  Monitor  nennen.  Ein  Pixel 
entspricht  einem  Bit,  ein  Byte  enthält  8  Bit.  Also  1 84320  ge¬ 
teilt  durch  8  sind  23040  Bytes.  Das  entspricht  den  ange¬ 
zeigten  23  kByte. 

LOGO  tut  aber  noch  mehr.  Als  Datei-Kopf  werden  38  Byte 
abgespeichert.  In  den  ersten  sieben  Bytes  dieses  Datei- 
Kopfes  steht  im  ASCII-Code  das  Wort  "PICTURE”.  Hin¬ 
ter  dem  Datei- Kopf  sind  dann  die  256  Zeilen  ä  90  Byte  ab¬ 
gespeichert.  720/8  =  90  Byte  entsprechend  der  horizonta¬ 
len  Auflösung,  256  Zeilen  entsprechend  der  vertikalen 
Auflösung. 

Der  Drucker  und  seine  Grafik 

Der  Drucker  von  Joyce  hat  nicht  nur  einen  immensen  Zei¬ 
chensatz  und  diverse  Schriftarten,  sondern  er  kann  auch 
Grafik  auf  s  Papier  bringen.  Das  geht  mit  einfacher  Auflö¬ 
sung  (480  Pixel/Zeile)  oder  mit  doppelter  Auflösung  (960 
Pixel/Zeile).  Da  der  Druckkopf  des  Druckers  acht  Nadeln 
besitzt,  die  untereinander  (vertikal)  angeordnet  sind, 
druckt  er  immer  acht  Grafikzeilen  auf  einmal. 

Der  springende  Punkt 

In  diesen,  scheinbar  nebensächlichen  Anmerkungen 
liegt  nun  der  Hund  bzw.  das  Pixel  begraben.  Während 
LOGO  in  seiner  Bild-Datei  jeden  Bildpunkt  fein  säuber¬ 
lich  hintereinander  ablegt,  braucht  der  Drucker  acht 
Pixel,  die  jeweils  720  Bit  bzw.  90  Byte  auseinanderliegen 
(siehe  auch  Bild  1  und  2).  Damit  liegt  die  Aufgabenstel¬ 
lung  für  das  Programm  fest. 

Bit  für  Bit  für  Bit... 

Zunächst  müssen  acht  Grafikzeilen  ä  90  Byte  mit  den  720 
Bildpunkten  von  der  Diskette  gelesen  werden.  Dann  wer¬ 
den  jeweils  aus  den  acht  untereinanderliegenden  Bytes, 
die  eine  8x8-Bit-Matrix  bilden,  die  Werte  der  Spalten  be¬ 
rechnet  und  diese  an  den  Drucker  ausgegeben. 

Für  ein  vollständiges  LOGO-Bild  muß  der  Drucker  also 
256  /  8  =  32  Zeilen  drucken.  Da  nun  erstens  solche  Bit- 
Rechnerei  nicht  gerade  die  Stärke  von  Basic  ist,  und 
zweitens  pro  Druckzeile  5760  Bildpunkte  umgewandelt 
werden  müssen,  dauert  die  Erzeugung  einer  Druckzeile 
ca.  eine  Minute. 


Das  gewisse  Extra 

Der  Gemütsmensch  wird  sich  angesichts  dieses  Zeitauf¬ 
wandes  zur  Kaffeepause  zurückziehen  und  dem  Compu¬ 
ter  die  Arbeit  überlassen.  Wer  es  eiliger  hat,  dem  bietet  das 
Programm  zwei  Möglichkeiten  immenser  Beschleuni¬ 
gung: 

1.  Ein  LOGO  Bild  nimmt  in  den  seltensten  Fällen  den 
ganzen  Bildschirm  in  Anspruch.  Es  ist  also  möglich,  die 
Anzahl  der  Druckzeilen  einzustellen. 

2.  Wenn  die  Daten  für  den  Drucker  schon  umgewandelt 
werden  müssen,  dann  kann  man  sie  auch  gleich  in  pas¬ 
sender  Form  auf  die  Diskette  schreiben.  Eine  solche 
Datei  ist  "ruckzuck"  wieder  ausgegeben. 

Copy  mit  Komfort 

Bei  der  Entwicklung  des  Programmes  wurde  darauf  ge¬ 
achtet,  daß  Eingaben  auf  das  unbedingt  notwendige  Maß 
reduziert  wurden.  Nach  Eingabe  und  Start  mit  RUN,  (Ein¬ 
gabe  vor  Starten  des  Programmes  unbedingt  speichern!!) 
zeigt  sich  ein  viergeteilter  Bildschirm. 

Im  ersten  Teil  finden  sich  außer  dem  Namen  und  der  Ver¬ 
sionsnummer  die  Werte  einiger  Parameter,  die  weiter 
unten  besprochen  werden.  Im  zweiten  Teil  befinden  sich 
neun  Menuepunkte,  die  zeigen,  wie  sich  das  Programm 
die  weitere  Zusammenarbeit  mit  dem  Benutzer  vorstellt. 
Der  dritte  und  größte  Teil  des  Bildschirmes  ist  dem 
Inhaltsverzeichnis  Vorbehalten.  Beim  ersten  Start  wird 
dieses  in  aller  Regel  die  lapidare  Meldung  "keine  Daten” 
beinhalten.  Der  untere  Teil  gibt  Fehlermeldungen  aus  und 
informiert  über  Fortschritte  beim  Ausdruck  eines 
Bildes. 

Die  Menuepunkte 

Im  zweiten  Teil,  in  dem  sich  die  Menuepunkte  befinden, 
sehen  Sie  einen  Menuepunkt  invers  dargestellt.  Dort  be¬ 
findet  sich  der  Menuecursor.  Diesen  können  Sie  mit  den 
Cursor-links-  bzw.  -rechts-Tasten  bewegen. 

Sicher  haben  Sie  auf  irgendeiner  Diskette  schon  ein 
LOGO-Bild  abgespeichert.  Diese  LOGO-Bilder  nennen 
wir  ab  jetzt  PIC-Dateien,  da  sie  den  Dateityp  .PIC  besit¬ 
zen. 

Jetzt  gehts  los... 

-  Programmdiskette  entnehmen. 

-  Datendiskette  einlegen  (die  mit  den  PIC-Dateien). 

-  Mit  dem  Menuecursor  auf  den  ersten  Menuepunkt  "dis- 
kette”  fahren  und  die  RETURN-  oder  ENTF.R-Taste  drük- 
ken  (alle  Menuefunktionen  werden  so  ausgelöst). 

Nach  kurzer  Zeit  erscheint  auf  dem  Bildschirm  im  dritten 
Teil  das  Inhaltsverzeichnis  der  Diskette.  Allerdings  werden 
zu  Ihrer  Entlastung  nur  solche  Dateien  angezeigt,  die  das  Da¬ 
teiattribut  PIC  oder  PRT  besitzen.  Die  PIC-Dateien  sind  in 
der  ersten,  die  PRT-Dateien  in  der  zweiten  Spalte  aufgeli¬ 
stet.  Die  oberste  PIC-Datei  ist  invers  dargestellt.  Dies  ist  der 
Dateicursor,  mit  dem  die  zu  druckende  Datei  ausgewählt 
wird.  Er  kann  mit  den  Cursor-hoch-  bzw.  -runter-Tasten  be¬ 
wegt  werden,  jedoch  nur  innerhalb  der  Gruppe  mit  den  PIC- 
Dateien.  Um  in  die  Gruppe  mit  den  PRT-Dateien  zu  gelan¬ 
gen,  setzen  Sie  einfach  den  Menuecursor  auf  "PRT”  und 
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drücken  RETURN.  Da  Sie  aber  vorläufig  noch  keine  PRT- 
Datei  im  Inhaltsverzeichnis  haben,  ist  diese  Funktion  noch 
sinnlos  und  der  Dateicursor  bleibt  in  der  ersten  Spalte. 
Mit  dem  Dateicursor  können  Sie  also  immer  das  Bild  aus¬ 
wählen,  das  Sie  ausdrucken  lassen  wollen. 

PIC  oder  PRT 

Die  PIC-Dateien  enthalten  die  Original-LOGO-Bilder. 
wie  sie  mit  dem  savpic-Befehl  gespeichert  wurden.  PRT- 
Dateien  hingegen  sind  Dateien,  welche  das  Programm 
während  des  Ausdruckens  einer  PIC-Datei  selbständig  er¬ 
zeugt.  PRT-Dateien  enthalten  also  die  "schnellen"  Bilder, 
von  denen  weiter  oben  schon  die  Rede  war. 

Darfs  auch  ein  bißchen  mehr  sein? 

Mit  dem  Menuepunkt  "zeilen”  können  Sie  einstellen,  wie¬ 
viele  Druckzeilen  der  PIC-Datei  ausgedruckt  werden  sol¬ 
len.  Maximal  sind  dies  32  Zeilen. 

-  Menuecursor  auf  "zeilen"  stellen. 

-  RETURN  drücken. 

-  Anstelle  des  inversen  Gleichheitszeichens  erscheint  ein 
Fragezeichen  und  die  gewünschte  Zeilenzahl  kann  ein¬ 
gegeben  werden. 

-  RETURN  schließt  die  Eingabe  ab. 

Auf  gleiche  Art  und  Weise  funktionieren  die  Menue- 
punkte  "köpf'  und  'Tand”.  Mit  "köpf  läßt  sich  die  Anzahl 
der  Zeilenvorschübe  vor  Ausdruck  des  Bildes  eingeben. 
Mit  dem  Menuepunkt  "rand”  wird  die  Breite  des  linken 
Randes  eingestellt.  Probieren  hilft  hier,  das  richtige  Maß 
zu  finden.  Diese  Parameter  können  ebenso  für  den  Aus¬ 
druck  einer  PRT-Datei  bestimmt  werden. 

Mit  oder  ohne? 

Mit  Hilfe  des  Menuepunktes  "±prt"  können  Sie  entschei¬ 
den.  ob  eine  PRT-Datei  erzeugt  werden  soll  oder  nicht. 
Normalerweise  ist  die  Erzeugung  einer  PRT-Datei  immer 
empfehlenswert.  Sie  müssen  nur  darauf  achten,  daß  auf 
Ihrer  Datendiskette  genügend  Speicherplatz  vorhanden 
ist.  Ein  DISK-FULL-Fehler  wird  nicht  abgefangen  und 
bedeutet  den  unsanften  Abbruch  des  Programmes.  Eine 
PRT-Datei  verbraucht  nicht  generell  23  kByte  Speicher¬ 
platz;  der  Platzbedarf  richtet  sich  nach  der  Anzahl  der 
Zeilen,  die  gedruckt  werden  sollen  und  liegt  zwischen 
einem  kByte  und  23  kByte.  Die  Laufzeit  des  Programmes 
verlängert  sich  durch  die  Generierung  der  PRT-Datei  nur 
unmerklich.  Die  PRT-Datei  wird  mit  demselben  Namen 
versehen,  den  auch  die  PIC-Datei  hat;  es  wird  nur  automa¬ 
tisch  der  Dateityp  in  .PRT  geändert. 

Let’s  go 

Wenn  Sie  alle  Parameter  entsprechend  Ihren  Wünschen 
eingegeben  haben,  der  Dateicursor  an  der  richtigen  Stelle 
steht  und  das  Kaffeewasser  kocht,  bleibt  nur  noch  eins 
zu  tun; 

-  Menuecursor  auf  "START”  stellen  und  RETURN-Taste 
drücken  -  und  Kaffee  trinken... 

Zum  Verlassen  von  COPYPIC  in  Richtung  C/PM  dient 
der  Menuepunkt  "EXIT”;  abbrechen  können  Sie  das 
Programm  jederzeit  mit  der  STOP-Taste. 

COPYPIC  intern 

Im  Listing  sind  ab  Zeile  10000  die  Bildschirm-  und 
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E  U  . 

IJ 

2  IJ 

U 

.  LI 

7  IJ 
2  IJ 
0  IJ 

Z  9 

LI 

Z  10 

IJ 

«  i  i 

In  dieser  Reihenfolge  bekoaat  der  Drucker  Daten, 
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Druckerkommandos  definiert.  Da  dieser  Teil  als  Modul 
hinzugeladen  wurde,  werden  von  diesen  Kommandos 
nicht  alle  benötigt.  Wenn  Sie  diese  zuerst  eingeben  und  als 
Text- Datei  mit  SAVE  ”BDCODES.TXT”,A  abspeichern, 
so  kommen  Sie  gleichzeitig  zu  einer  recht  umfassenden 
Kommandobibliothek,  die  bei  der  Entwicklung  eigener 
Programme  nützlich  ist.  In  Ihre  eigenen  Programme  kön¬ 
nen  diese  Kommandos  mit  MERGE  ”BDCODES.TXT” 
leicht  eingebunden  werden  und  mit  GOSUB 10000  initia¬ 
lisiert  werden.  Natürlich  dürfen  in  Ihrem  Programm  die 
Zeilennummern  von  10000  bis  11350  nicht  benutzt 
werden.  (Thorsten  Schlote/MC) 

iooo  • _ _ _ _ _ 


1010 

1020  •  COPYPIC  (LOGO  GRAFIK- AUSDRUCK) 

1030  1  VERSION  1.04  /  APRIL  86 

1040  *  THORSTEN  SCHLOTE 

1060  • _ — - 


2000 

1 

2010 

•  INITIALISIEREN 

2020 

• 

2030 

CLEAR,  S.HF400,  512,3,1024 

2040 

• 

2050 

GOSUB  10000 

: ' BILDSCHIRM- 

KOMMANDOS 

2060 

GOSUB  11000 

: • DRUCKER- KOM 

KANDOS 

2070 

' 

2080 

PRINT  Lomes  clsS; 

: • BILDSCHIRM 

LÖSCHEN 

2090 

LPRINT  CHRS  <24 ) \ resS 

: • DRUCKER  ZUR 

ÜCKSETZEN 

2100 

OPTION  NOT  TAB 

: • AH09  (TABUL 

ATOR)  UNTERDRÜCKEN 

2110 

WIDTH  90  :  VIDTH  LPRINT  255 

2120 

* 

2130 

DEFINT  a-z 

2140 

• 

2150 

DIM  fO  <  7  > 

: ' Masken  BBI 

BIT  UMWANDLUNG 

2160 

FOR  i  =  0.  TO  7 

2170 

READ  fO<i> 

2180 

NEXT 

2190 

* 

2200 

DIM  wahlS  <  8  > 

: • TEXTE  FÜR  K 

ENü 

2210 

FOR  1=0  TO  8 

2220 

READ  wahlSOL) 

2230 

NEXT 

2240 

* 

2250 

DIM  Inhalts  <1, 15) 

: * INHALTSVBRZ 

EICHNISS  DER  DISKETTE 

2260 

DIM  iS  <  1  ) 

:  *  DATEI TYPE 

2270 

IS  <0>=" . PIC" 

2280 

iS  <1)=" . PRT" 

2290 

DIM  imax  <  1  > 

:  *  MAXIMALE  AN 

ZAHL  IM  INHALTSVERZEICHN ISS 

2300 

• 

2310 

DIM  aS  C  7  ) 

: ' 8  SUB-ZBILE 

N  x  90 

ZEICHEN 

2320 

• 

2330 

DIM  U<7) 

: *  Bitfeld  für 

Umwandlung 

2340 

* 

2350 

nual  ="0123456789" 

:  *  NUMMERISCHE 

VERTE 

2360 

grupp«  =0 

237  0 

datei  =0 

: ' DEFAULT  FÜR 

ERSTE 

ANZEIGE 

2380 

1 

2390 

zmax  =32 

: • DEFAULT  FÜR 

DRUCKZEILEN 

2400 

rand  =0 

: • DEFAULT  FÜR 

LINKEN  RAND 

2410 

köpf  =0 

: • DEFAULT  FÜR 

ANZAHL  DER  KOPFZEILEN 

2420 

• 

2430 

prtmod  =- 1 

: ' DEFAULT  FÜR 

PRT  DATEI 

2440 

prtS  =" +PRT  dat" 

2450 

• 

WEITERE  VAR 

IABLE 

VERDEN  WÄHREND  DER 

2460 

* 

LAUFZEIT  EI 
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★  hat  das  richtige  Schriftbild  für  Anspruchsvolle 

★  schreibt  schnell  (bis  zu  15  Zeichen/sec.)  und  leise  (kleiner  65  dB) 

★  bedruckt  Etiketten,  Endlospapier,  Briefpapier,  DIN  A3-Format  quer 

★  ist  durchschlagend:  Original  plus  4  Kopien 

★  läßt  vielfältige  Gestaltungsmöglichkeiten  zu:  drei  verschiedene  Zeichen¬ 
dichten,  Schatten-  und  Fettdruck,  autom.  Unterstreichen  voll  und  wort¬ 
weise,  hoch-  und  tiefstellen,  halber  Zeilenschritt  vorwärts  und  rückwärts 

★  druckt  bidirektional  mit  Druckwegoptimierung 

★  ist  Diablo-kompatibel  (Diablo  630) 

★  gibt  LocoScript-Texte  (JOYCE)  über  das  Programm  L0C015  (DM  59,-)  aus 

★  hat  serienmäßig  parallele  und  serielle  Schnittstelle,  Traktor  und  Selbsttest 

★  ist  der  Typenraddrucker  von  SchneiderData  für  Schneider  Computer 


SchneiderData  •  Rindermarkt  8  *  D-8050  Freising  •  Telefon  081 61/2877 


Schneider 


der  Typenraddrucker 
für  alle 

Schneider  Computer 


INI. 


MIM  llllll  II  I  I  li 


II  M  Mil 


1 1 1 1 1 1  ■  I 


. Joyce* . . 


im  mm  1 1 1 1 1 1 1 1 


1GBPÜHRT 


2470 

• 

4800 

3000 

• 

4810 

FOR  spalte= 1  TO  90 

4820 

PRINT  FNatS (28 , 23 ) ; "S=" ; spal 

3010 

• 

te 

3020 

’  HAUPTPROGRAMM 

4830 

1 

3030 

• 

4840 

•  UMWANDLUNG  IN  BITFELD 

3040 

GOSUB  8010 

4850 

' 

3050 

GOSUB  7010 

4855 

FOR  1=0  TO  7  :  b ( 1 ) =ASC (KIDS 

3060 

END 

(aS  (1) 

, spalte, 1))  :  NEXT 

4000 

• 

4860 

FOR  1=0  TO  7  :  e=0 

4870 

FOR  j  =0  TO  7 

4010 

• 

4880 

IF  b(J)  AND  f  0  (i )  T 

4020 

'  PRT  ODER  PIC  DATEI  DRUCKEN 

HEN  e  = 

e+f 0 ( j > 

4030 

• 

4890 

NEXT 

4040 

ON  gruppe+1  GOSUB  4510,4100 

4940 

1 

4050 

RETURN 

4950 

'  ZEICHEN  DRUCKEN 

4060 

* 

4960 

■ 

4970 

LPRINT  CHRS (e) ; 

4100 

• 

4980 

IF  NOT  prtmod  THEN 

4110 

•  PRT  DATEI  DRUCKEN 

5010 

4120 

• 

4990 

pS=pS+CHRS(e)  : 

4140 

OPEN  "R"  ,  #1  ,  Inhalts (gruppe , datei )  , 

240 

pp=pp+l 

4150 

FIELD  #1  ,  240  AS  gwertS 

5000 

IF  pp=241  THE 

4160 

GET  #1 

N  GOSUB  5090 

4170 

1 

5010 

NEXT 

4180 

testS=LEFT$ (gwertS,  7)  :  xS=" PICTURE" 

5020 

1 

4190 

IF  NOT  (test$=xS)  THEN  ex=l  :  GOSUB 

9100 

5030 

NEXT 

:  RESEI  :  RUN 

5040 

LPRINT 

42Q0 

x=ASC ( MI DS (gwertS, 8,  1) ) 

5050 

NEXT  zelle 

4210 

IF  zmax  >  x  THEN  zmax=x 

5060 

CLOSE  #1 

4220 

• 

5070 

IF  prtmod  THEN  GOSUB  9000  :  '  PRT  DATEI 

4230 

FOR  1=1  TO  köpf  :  LPRINT  lfS;  :  NEXT 

SCHLIEßEN 

4240 

• 

5080 

RETURN 

4250 

LPRINT  FNlrS(rand); 

5090 

1 

4260 

LPRINT  FNn72S (8) ; 

5100 

'  EINTRAG  IN  PRT  DATEI 

4270 

• 

5110 

1 

4280 

'  ZEILEN  LESEN  UND  DRUCKEN 

5130 

LSET  pwertS=pS 

4290 

• 

5140 

PUT  #2 

4300 

FOR  zelle  =1  TO  zmax 

5150 

p$="M  :  pp=l 

4310 

PRINT  FNatS (28. 5) ; "Z=" ; zelle 

5170 

RETURN 

4320 

LPRINT  FNgdS (720); 

5500 

4330 

• 

4340 

•  720  BYTES  LESEN 

5510 

1 

4350 

5520 

'  VORBESETZUNG 

4360 

FOR  1=0  TO  2 

5530 

' 

4370 

GET  #1 

5540 

DATA  128,64,32,16,8,4,2,1 

4380 

LPRINT  gwertS; 

: ' FELD  f 0 

4420 

NEXT 

5550 

DATA  "diskette“ , "  PIC  "  , "  PRT  "  ,"  zei 

4430 

LPRINT 

len  " 

: ' FELD  wahlS 

4440 

NEXT  zelle 

5560 

DATA  "  rand  köpf  +-prt  "  , "  STA 

4450 

CLOSE  #1 

RT  " 

* 

4460 

RETURN 

5570 

DATA  "  EX IT  " 

4500 

• 

6000 

' 

4510 
4520 
4530  ' 

4540 
4550 
4500 
ÖFFNEN 
4570 
4580 
4590 
4610 

4620 

4630 

4640 

4650 

4660 

4670 

4680 

4690 

4700 

4710 

4720 

4730 

4740 

4750 

4760 

«>*"" 

4765 

4770 


DRUCKEN  UND  PRT  DATEI  ERZEUGEN 
IF  kd  THEN  RETURN 

IF  prtmod  THEN  GOSUB  8800  : ' PRT  DATEI 


'  BILD-DATEI  ZUM  LESEN  ÖFFNEN 

OPEN  ”R"  ,  #1  ,  Inhalts (gruppe, datei)  , 

FIELD  #1  ,  1  AS  byte* 

GOSUB  8500 

FOR  i=l  TO  köpf  :  LPRINT  lfS;  :  NEXT 
LPRINT  FNLxS(rand); 

LPRINT  FNn72S<8>; 

'  ZEILEN  LESEN  UND  DRUCKEN 

FOR  zeile=l  TO  zmax 

PRINT  FNatS <28, 5) ; "Z=" ; zelle 

LPRINT  FNgdS (720) ; 

*  8  SUB-ZEILEN  LESEN 

FOR  subzeile  =  0  TO  7  :  aSCsubzeil 

FOR  1=1  TO  90 

GET  #1  :  aS (subzeile)  =  a$ (s 


ubzei le  >  +byte$ 
4775 
4780 
4790 
DRUCKEN 


NEXT 

NEXT 

•  EINGELESENE  SPALTE  UMWANDELN  UND 


6010 

6020  1  WÄHLEN 

6030  ' 

6040  x=0 

6050  IF  wähl <7  THEN  wahl=wahl+l  ELSE  wahl= 


gruppe +1 


6060 

6070 

6080 

6090 

6100 

aff* 

6110 

6120 

6130 

6140 

6150 

HE*  wahl=0 


VHILE  x<> 13 
PRINT  FNatS <6, 0>; 

FOR  1=0  TO  8 

IF  i=wahl  THEN  PRINT  InvonS; 
PRINT  FNatS <6, 1*10) ;  wahlS(i);  inv 

NEXT 

GOSUB  6210 
PRINT  FNatS <3, 80); 
x= ASC ( INPUTS ( 1  >  > 

IF  x=6  THEN  wähl »wähl +1  :  IF  wähl »9  T 

:  GOTO  6190 


6160  IF  x=l  THEN  wahl=wahl-l  :  IF  wähl» 

-1  THEN  wähl =8 :  GOTO  6190 

6170  IF  x=31  THEN  GOSUB  6310 

6180  IF  x=30  THEN  GOSUB  6380 

6190  VEND 

6200  RETURN 
6210 

6220  '  AKKTUELLE  DATEI  INVERS  SETZEN 

6230 

6240  PRINT  FNatS <9+datei, 30*gruppe) ; invonS; ln 

haltS (gruppe, datei) ; invoffS; 

6250  RETURN 

6260 

6270  '  AKTUELLE  DATEI  NORMAL  SETZEN 

6280  '  . 

6290  PRINT  FNatS (9+datei , 30*gruppe) ; InvoffS; 1 

nhal t$ (gruppe , datei ) ; 
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CURSOR  UP  EI HE  DATEI  HÖHER 


6300  RETURH 

6310  ' 

6320 
6330  ’ 

6340  GOSUB  6260 

6350  datei=datei-l 

6360  IF  dateiCO  THBH  datei=0 

6370  RETURH 

6380 

6390  •  CURSOR  DOVN  EI HE  DATEI  TIEFER 

6400  ' 

6410  GOSUB  6260 

6420  datei=datei+l 

6430  IF  datei> imax (gruppe)  THEH  datei=imax 

(gruppe) 

6440  RETURH 

7000  ' _ 


Grafik  1 


7010 

7020  '  HAUPTMENÜ 

7030 

7040  PRIHT  home$  clsS  st S 

7050  PRIHT 

7060  PRIHT  "COPYP IC  Vers.  1.04"; 

7070  PRIHT  FHatS (3,30);  invonS;  "="  ;  invof fS;  zma 

x; 

7080  PRIHT  FNatS  <3, 40) ; invon$; "=" ; invof fS; ran 

d; 

7090  PRINT  FHatS  <3 , 50) ; InvonS ;  ; invof f 4 ; kop 

f ; 

7100  PRIHT  FHatS (3,60) ; prtS 

7110  PRIHT  sts 

7120  PRIHT 

7130  PRIHT 

7140  PRIHT  stS 

7150  PRIHT 

7160  FOR  1=0  TO  1 

7170  FOR  j  =0  TO  imax(l) 

7180  PRIHT  FHatS (9+ J , 1*30) ; Inhalts <i 

,  j> 

7190  HEXT 

7200  HEXT 

7210  PRIHT  FHatS <25, 0); stS 

7220  GOSUB  6000 

7230  OH  wahl+1  GOSUB  7250,7320,7380,7440,7 

540,7640,7740,4010,7800 

7240  GOTO  7010 

7250 

7260  *  DISKETTEN  RESET 

7270 

7280  OPTION  FILES  "A" 

7290  RESET 

7300  GOSUB  8010 

7310  RETURH 

7320  • 

7330  *  AUF  PIC  STELLEN 

7340 

7350  datei=0  :  gruppe=0 

7360  IF  imax(0)=-l  THEH  gruppe=l 

7370  RETURH 

7380  ' 

7390  '  AUF  PRT  STELLEN 

7400 

7410  datei=0  :  gruppe=l 

7420  IF  imax  < 1 ) =-l  THEN  gruppe=0 

7430  R8TURV 

7440 

7450  •  DRUCKZBILBI  PUR  GRAPIK  EIISTELLEN 

7460 

7470  x=0 

7460  VHILE  x<l  OR  x>32 

7490  PRIHT  FHatS <3 , 3 0 ) ; " 7  ";FNatS<3,3 

2); 

7500  GOSUB  8300 

7510  VEND 

7520  zmax=x 

7530  RETURH 

754  0 

7550  '  LINKEN  RAND  EIHSTELLEN 

7560 

7570  x=-l 

7580  VHILE  x<0  OR  x>19 

7590  PRINT  FHatS (3,40);"?  FNatS <3, 4 

2); 

7600  GOSUB  8300 

7610  VEND 

7620  rand=x 

7630  RETURH 

7640 


7650  ’  KOPFZBILEN  EIHSTELLEN 

7660 

7670  x=— 1 

7680  VHILE  x<0  OR  x>72 

7690  PRINT  FNatS <3, 50);"?  ";FHatS(3,5 

2)  ; 

7700  GOSUB  8300 

7710  VEHD 

7720  kopf=x 

7730  RETURH 

7740 

7750  ’  OPTIONEN 

7760 

7770  prtmod=NOT  prtmod 

7780  IF  prtmod  THEH  prtS="+PRT  dat"  ELSE  p 

rtS="-PRT  dat" 

7790  RETURN 

7800 

7810  ’  EXIT 

7820  ’ 

7830  CLOSE 

7840  PRINT  homeS  clsS; 

7850  SYSTEM 
7860  END 
8000 


8010  ' 

8020  . '  INHALTSVERZEICHN ISS  ERSTELLEN 

8030 

8040  imax <0>=-l  :  imax<l)=-l 
8050  1=0 

8060  VHILE  1<2 

8070  j  =0 

8080  Inhalts  <1 , j  >=STRIPS (FIHDS <" *"+iS  <1 ) , j 

+  1)  ) 

8090  VHILE  Inhalts  <i,J><>""  AND  j<16 

8100  j=j+l 

8110  Inhalts <1, j  >=STRIPS (FIHDS <"*"+1 

S<1>,  j+l)> 

8120  VEHD 

8130  lmax(i)=j-l 

8140  1=1+1 

8150  VEHD 

8160  kd=0 
8170  gruppe=0 

8180  IF  Imax<0>=-1  AND  imax(l)>-l  THEH  gruppe 

=  1 

8190  IF  imax(l)=-l  AND  Imax<0)>-1  THEH  gru 

ppe=Q 

8200  IF  lmax(0)=-l  AND  lmax(l)=-l  THEH 

GOSUB  8220 
8210  RETURH 
8220 

8230  *  BEIDE  GRUPPEN  KEINE  DATEN 

8240 

8250  Inhalts (0, 0>="Keine  Daten" 

8260  grupps=0  :  datel=0  :  imax ( 0 >  =0 

8270  kd= 1 

8280  RETURH 

8300  '  .  . 

8310  •  Z VE ISTELL IGE  ZAHL  EINLESEN 

8320 
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illlll  llll 


"Joyce’ 

8330  x=2  :  x* =M  '■  :  xeS="" 

8340  DEF  FNdel=(ASC(xS>=7  OR  ASC(xS>=127> 

8350  VH ILE  ASC(x$X>13 

8360  xS= INPUTS  <1 > 

8370  IF  x>0  AND  INSTR (num$ ,  xS) <> 0  THEN  PRI 

NT  xS;  :  x=x-l  :  xeS=xeS+xS 


8380 

PRINT 

IF  FNdel 
"  "ideftSi 

AND 

x=2 

THEN 

x=2  : 

xeS=! 

8390 

PRINT 

IF  FNdel  AND 
clef tS ; "  cleftS; 

X=1 

THEN 

x=2  : 

xeS=' 

8400 

IF  FNdel 

AND 

x=0 

THEN 

x=2  : 

xe$=' 

PRINT 

clef tS"  " cleftS 

cleftS" 

"cleftS; 

8410  VEND 

8420  x=VAL  (xeS ) 

8430  PRINT  FNatS <2, 89) ; 

8440  RETURN 
8500  ' 

8510  '  AUSGEVÄHLTE  DATEI  PRÜFEN  UND  HEADER  LESEN 

8520 

8530  gwertS="" 

8540  FOR  1=1  TO  38 

8550  GET  #1 

8560  gwert$=gwert$+byte$ 

8570  NEXT 

8580  testS=LEFTS  <STRIPS  <gwerts ) , 7 ) 

8590  IF  NOT  <testS="PICTURE" >  THEN  ex=l  :  GOSUB 
9100  :  RESET  :  RUN 
8600  RETURN 
8800 

8810  •  PRT  DATEI  ERÖFFNEN 

8820 

8840  p$="" 

8850  pp= 1 

8860  prtkopieS=LEFT$ (Inhalts (gruppe, datei > , 8)+" . 
PRT" 

8870  OPEN  "R”  ,  #2  ,  prtkopieS  ,  240 
8880  FIELD  #2  ,  240  AS  pwertS 
8890  xS="PICTURE,*+CHR$  (zmax) 

8900  LSET  pwert$=xS 
8910  PUT  #2 
8930  RETURN 
9000  ' 

9010  '  PRT  DATEI  SCHLIEBEN 

9020 

9040  LSET  pwerts=pS 
9050  PUT  #2 
9060  CLOSE  *2 

9070  GOSUB  8010 

9080  RETURN 
9100  ' 

9110  *  FEHLERBEHANDLUNG 

9120 

9130  PRINT  FNatS (25, 0>;stS 

9140  PRINT 

9150  PRINT  CHRS (7)  ; 

9160  IF  exOl  THEN  RETURN 

9170  PRINT  "Datei-Kopf  ungültig  in  : " : inha 

lts (gruppe, datei ) 

9180  PRINT  "Neu-Start  mit  <RETURN>" j 
9190  xS= INPUTS (1)  :  RETURN 

10000  REK  _ 


10010  REM 

10020  REM  BILDSCHIRMKOMMANDOS 
10030  REM  _ 


10040 

REM 

10050  escS 

= 

CHRS (27)  : 

REM 

ESCAPE 

10060 

REM 

10070  homeS 

= 

escS+"H“  : 

REM 

CURSOR 

IN 

ZEILE  0,  SPALTE 

0 

10080  erasS 

= 

escS+" J"  ; 

REM 

VON  CURSO 

R  BIS  ENDE  SEITE 

LÖSCHEN 

10090 

REM 

10100  clsS 

= 

escSf'E"  : 

REM 

BILDSCHIR 

M  LÖSCHEN 

10110  clzS 

= 

esc$+" 1H  : 

REM 

ZEILE  LÖS 

CHEN 

10120 

REM 

10130  cupS 

= 

esc$+" A" : 

REM 

CURSOR 

EI 

NE  ZEILE  HOCH 

10140  cdownS 

= 

escSt" B" : 

REM 

CURSOR 

EI 

NE  ZEILE  RUNTER 

10150  crightS 

= 

escS+" C" : 

REM 

CURSOR 

EI 

N  ZEICHEN  WEITER 

10160  cleftS 

= 

escS+"D"  : 

REM 

CURSOR 

EI 

N  ZEICHEN  ZURÜCK 

10170 

REM 
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10180 

getcS 

=  escS+" j " : 

REM 

SPEICHERT 

CURSOR-POSITION 

10190 

prtcS 

=  esc$+"k": 

REM 

SETZT  CUR 

SOR  AUF  GESPEICHERTE  POSITION 

10200 

REM 

10210 

usof f S 

=  escS+"u" : 

REM 

UNTERSTRE 

ICHEN 

AUS 

10220 

usonS 

=  esc$+"r" : 

REM 

UNTERSTRE 

ICHEN 

10230 

EIN 

REM 

10240 

N 

10250 

invonS 

=  escS+"p"  : 

REM 

INVERS  EI 

invof f S 

=  esc$+" q”  : 

REM 

INVERS  AU 

10260 

REM 

10270 

nornalS 

=  escS+”y": 

REM 

24x90  EIN 

10280 

REM 

10290 

stS= 

STRINGS (90, "_")  ; 

REM 

STRICH  ÜB 

ER  GANZEN  BILDSCHIRM 

10300 

REM 

10310 

REM 

CURSOR  AU 

F  ZEILE  x,  SPALTE 

y  SETZEN 

10320 

DEF  FNatS (x%, y%> 

=  escS+" Y" +CHRS ( 

32+x) +CHRS  <32+y> 

10330 

REK 

10340 

REM 

WINDOW  MI 

T  x,  y, 

h, b,  DEFINIEREN 

10350 

DEF  FNwi ndowS (x% , y% , h% , b%> 

=  esc$+" X" +CHRS ( 

32+x> +CHRS <32+y>  +CHRS <31+h>  +CHRS (31+b) 

10360 

RETURN 

11000 

REM 

11010  REM 

11020  REM  DRUCKERKOMMANDOS 
11030  REM  _ 


11040  REM 

11050  escS=CHRS (27) :  REM 

ESCAPE 

11060  REM 

11070  REM 

SEI TEN- LAYOUT 

11080  REM 

11090  zal08zzS=escS+" 0" :  .  REM 

8  ZEILEN/ ZOLL 

11100  za712zz$=escS+" 1" :  REM 

7/12  ZEILEN/ZOLL 

11110  zal06zz$=esc$+"2" :  REM 

6  ZEILEN/ ZOLL 

11120  REM 

11130  DEF  FNn216S (x)=escS+"3"+CHRS(x>  :  REM 

n/216  ZEILEN/ZOLL 

11140  DEF  FNn72$  (x>  =escS+" A" +CHRS (x> :  REM 

n/72  ZEILEN/ ZOLL 

11150  REM 

11160  DEF  FNlrS (x)=escS+" 1" +CHRS (x)  :  REK 

LINKER  RAND 

11170  DEF  FNrrS (x)=escS+"Q"+CHRS(x> :  REM 

RECHTER  RAND 

11180  REM 

11190  crS=CHRS (13) :  REM 

WAGENRÜCKLAUF 

11200  lfS=CHR$ (10) :  REM 

ZEILENVORSCHUB 

11210  f f S=CHRS (12) :  REM 

SEITENVORSCHUB 

11220  REM 

11230  einzblS=escS+" S"+escS+"C" +" 0" +CHRS  <10> : REM 
EINZELBLATT  DIN  A4 

11240  endlosS=escS+"c" +escS+"C0" +CHRS  <1 1>  :  REM 

ENDLOSPAP.  DIN  A4 

11250  REM 

11260  resS=escS+"§" :  REM 

DRUCKER  RESET 

11270  REM 

11280  DEF  FNgnS  <x)=escS+" K" +CHRS ( INT ( ( (x/256>- (IN 
T (x/256)  )  >  -»256  >  )  +CHRS  <  INT  (x/256  > ) 

11290  REM 

BIT  BILDER  NORMALE  DICHTE 

11300  DEF  FNgdS (x) =escS+"L" +CHRS ( INT ( < (x/256) - (IN 
T (x/256 ) ) >  *256  )  )  +CHRS ( INT (x/250 >  > 

11310  REM 

BIT  BILDER  DOPPELTE  DICHTE 

11320  REM 

11330  kompS=CHRS (15)  :  REM 

KOMPAKT  SCHRIFT 

11340  elite$=escS+"M" :  REM 

ELITE  SCHRIFT 
11350  RETURN 
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Funktionenplot 


Für  die  Kenner  von  Mallard-Basic  ist  es  kein  Geheimnis;  den 
neuen  Joyce-Besitzer  verwundert  jedoch  die  Tatsache:  der 
Computer  ist  grafikfähig,  das  mitgelieferte  Basic  aber  nicht. 
Gut  -  nehmen  wir  halt  die  Sprache  Logo  zwecks  der  Grafiker¬ 
zeugung,  wozu  sie  ja  konzipiert  wurde.  Dieses  Ansinnen  ist 
aber  leider  nicht  bei  jeder  Anwendung  zweckmäßig.  Wer  sich 
aber  trotzdem  nicht  in  weitere  Unkosten  für  eine  ”grafikfä- 
hige”  Programmiersprache  für  den  Joyce  stürzen  will,  der 
kann  sich  mit  folgendem  Programm  weiterhelfen  -  mit 
praktischem  Nutzen  und  als  Anregung. 


Es  handelt  sich  hierbei  um  einen  zunächst  "stink”  (Verzei¬ 
hung!)  normalen  Funktionenplotter.  Der  einzige  Vorteil 
zu  anderen  Plottern,  die  ja  käuflich  erstanden  werden 
müssen,  wenn  man  sie  nicht  selbst  programmiert  und 
baut,  ist.  daß  sich  dieser  einfache  Plotter  mit  der  mitgelie¬ 
ferten  Soft-  und  Hardware  des  Joyce  realisieren  läßt 
Wie  oben  schon  erwähnt,  unterstützt  Mallard-Basic  nicht 
die  Grafikfähigkeit  des  Joyce,  die  Sprache  Logo  aber  sehr 
wohl.  Der  Funktionenplotter  verbindet  nun  auf  einfache 
Weise  die  Vorteile  der  beiden  Sprachen: 

-  Basic  eignet  sich  recht  gut  zur  Verarbeitung  von  mathe¬ 
matischen  Formeln,  weil  es  wesentlich  schneller  als 
Logo  ist 

-  Logo  ist  hingegen  grafikfähig,  eignet  sich  aber  nicht  be¬ 
sonders  gut  zur  Formelverarbeitung,  zumal  wichtige 
Funktionen  wie  etwa  die  Exponentialfunktion  fehlen 

Was  liegt  also  ferner,  als  die  zwei  Zusammenarbeiten  zu 
lassen! 


So  geht’s 


Als  erstes  erstellt  man  sich  eine  Diskette  mit  den  für  den 
Plotter  nötigen  Programmen.  Dies  sind  einmal  die  zwei 
Dateien  mit  den  Programmiersprachen  BASIC.COM  (1. 
Systemdiskette,  Seite  2)  und  LOGO.COM  (2.  System¬ 
diskette,  Seite  2)  sowie  das  Programm  zur  Verarbeitung 
von  Stapeldateien  SUBM1T.COM  (1.  Systemdiskette, 
Seite  2).  Dazu  sei  auch  nochmal  auf  den  Artikel  "Start¬ 
disketten  anders  erstellt"  aus  Heft  6/86,  Seite  23  hingewie¬ 
sen.  Dazu  werden  noch  das  Basic-Programm  PLOT.BAS 
(Listing  1)  und  die  Stapeldatei  PLOT.SUB  (Listing  2)  nach 
erfolgter  Eingabe  gespeichert. 

Bevor  man  das  Basic-Programm  zwecks  Ausprobieren 
startet,  sollte  dieses  unbedingt  gespeichert  werden,  da  das 
Programm  nach  dem  Ablauf  Basic  verläßt  und  zum  Be¬ 
triebssystem  zurückkehrt.  Das  Programm  ist  dann  unwi  - 
derruflich  "verschwunden”,  wenn  es  vorher  nicht  gespei¬ 
chert  wurde.  Für  die  Erstellung  der  Stapeldatei  sollte  der 
Editor  RPED.BAS  verwendet  werden,  dessen  Handha¬ 
bung  sich  nach  Start  mit  BASIC  RPED  von  selbst 
erklären  dürfte. 


Der  Ablauf 


Die  Stapeldatei  PLOT.SUB  übernimmt  nach  Aufruf 
durch  Eingabe  SUBMIT  PLOT  die  Ablaufsteuerung.  Die 
erste  Zeile  bzw.  der  erste  Befehl  (basic  plot)  dieser  Datei 
bewirkt  das  Laden  des  Basic-Interpreters  und  bringt  das 


Programm  PLOT.BAS  zur  Ausführung.  Nun  hat  man  die 
Möglichkeit,  die  zu  plottende  Funktion  über  die  Tastatur 
einzugeben  oder  aus  einer  Datei  zu  lesen,  die  (irgend¬ 
wann)  erstellt  worden  ist.  Letzteres  geschieht  immer  auto¬ 
matisch,  wenn  eine  Funktion  über  die  Tastatur  eingege¬ 
ben  wird;  sie  wird  unter  einen  anzugebenden  Namen  mit 
dem  Dateityp  .FKT  gespeichert.  Warum,  erfahren  Sie 
etwas  später. 

Als  nächstes  wird  der  Intervall  abgefragt,  in  dem  die 
Funktion  dargestellt  werden  soll,  und  daraufhin  der  benö¬ 
tigte  Maßstab  der  Y-Achse  berechnet,  um  eine  größtmögli¬ 
che  Auflösung  zu  erzielen.  Als  letztes  -  und  das  ist  eigent¬ 
lich  der  Clou  der  ganzen  Sache  -  generiert  das  Basic- 
Programm  ein  einfaches  Logo-Programm  und  speichert 
dieses  unter  dem  Namen  PLOT.LOG  in  das  Laufwerk  M:. 
Damit  ist  die  Aufgabe  dieses  Programmes  beendet  und 
mit  dem  Befehl  SYSTEM  wird  wieder  zum  Betriebssystem 
zurückgekehrt. 

Hier  kommt  nun  der  zweite  Befehl  der  Stapeldatei  zur 
Ausführung:  logo.com  m:plot.  Dieser  Befehl  bewirkt 
genau  das  gleiche  wie  der  Befehl  der  ersten  Zeile,  jedoch 
wird  hier  der  Logo- Interpreter  geladen  und  das  in  M:  be¬ 
findliche  Logo-Programm  PLOT.SUB  ausgeführt.  Als  Er¬ 
gebnis  ist  die  "geplottete”  Funktion  endlich  auf  dem 
Monitor  zu  begutachten.  Hat  man  sich  genug  daran  er¬ 
götzt,  so  kann  man  durch  die  Eingabe  von  BYE  (was  am 
Bildschirm  nicht  angezeigt  wird)  und  Drücken  der 
Return-Taste  wieder  zum  Betriebssystem  gelangen  und 
das  Ganze  wiederholen. 


Einzelheiten 


Bei  der  Eingabe  der  Funktion  (F(x)  = ...)  ist  unbedingt  auf 
die  Syntax  (Grammatik)  und  die  zur  Verfügung  gestellten 
Funktionen  von  Basic  zu  achten  (s.  Handbuch).  Hier  ein 
paar  Beispiele: 

sin(x)  Sinus-Funktion 

IoglG(x)  Logarithmus  zur  Basis  10 

cos(x)*exp(-x/10) 

Entspricht  die  eingegebene  Funktion  nicht  den  Regeln,  so 
stoppt  das  Programm  mit  der  entsprechenden  Basic- 
Fehlermeldung  in  Zeile  2100,  wo  die  Funktion  mit  FNf(x) 
aufgerufen  wird.  Die  zu  plottende  Funktion  selbst  ist  in 
der  Zeile  1000  gespeichert  und  entsprechend  der  Fehler¬ 
meldung  zu  analysieren. 


selfmodifying 


Nun  stellt  sich  die  Frage,  wie  diese  bei  jeder  Funktion 
unterschiedliche  Programmzeile  ohne  Zutun  des  Benut¬ 
zers  und  Ändern  des  Programmes  durch  eben  diesen  ent¬ 
steht.  Dafür  gibt  es  eine  ganz  einfache  Erklärung.  Das 
Programm  modifiziert  (ändert)  sich  selbst.  Und  dies  ge¬ 
schieht  ohne  raffinierte  Kunstgriffe  mittels  Pokes  oder 
Tastenumbelegung,  die  eine  exakte  Kenntnis  des  Innenle¬ 
bens  des  Interpreters  verlangen,  sondern  mit  ganz  legalen 
Basic-Befehlen. 

Die  Funktion  wird  in  Zeile  180  in  die  Zeichenkettenva¬ 
riable  Fkt$  eingelesen,  und  in  den  Zeilen  200  -  230  als 
Programmzeile  in  eine  Textdatei  (ASCII-File)  auf 
Diskette  geschrieben.  Dazu  wird  die  eingegebene 
Funktion,  z.B.  sin(x),  in  Zeile  220  noch  gemäß  der  Basic- 
Syntax  mit  der  Zeilennummer  1000  und  dem  Schlüssel¬ 
wort  zur  Funktionsdefinition  DEF  FNf(x)—  ergänzt.  Eine 
vollständige,  gespeicherte  Zeile  wäre  also  z.B.  1000  DEF 
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FNf(x)=sin(x).  Aus  diesem  Grund  können  Sie  eben  auch 
auf  schon  erstellte  Funktionen  bei  der  Frage  "Existiert  die 
zu  plottende  Funktion  schon?”  zurückgreifen. 

Nun  kann  dieser  Programmteil  mit  Hilfe  des  Befehls 
CHAIN  MERGE  dateiname,zeilennummer,ALL  (s.  auch 
Handbuch,  S.  184)  wieder  zu  dem  laufenden  Programm 
hinzugeladen  und  ausgeführt  werden.  Bei  diesem 
Programm  besteht  der  nachgeladene  Teil  nur  aus  einer 
Zeile;  es  können  auf  diese  Weise  aber  auch  größere 
Programmteile  nach  Bedarf  hinzugeladen  werden.  Bei 
umfangreichen  Programmen  können  so  Überlagerungen 
(Overlays)  in  Basic  realisiert  werden.  Mit  der  "zeilennum- 
mer”  wird  bestimmt,  an  welcher  Stelle  das  Programm 
nach  der  Ausführung  des  CHAIN-Befehls  fortgesetzt  wer¬ 
den  soll.  In  diesem  Fall  bei  Zeile  1000,  da  die  geladene,  zu 
plottende  Funktion  definiert  werden  muß.  Der  Parameter 
"ALL”  bewirkt  die  Erhaltung  aller  Variablen  und  ihrer 
aktuellen  Werte. 


plotten 


Aus  dem  vom  Benutzer  angegebenen  Plotintervall  bzw. 
Abzissenbereich  ergibt  sich  das  Maximum  und  Minimum 
der  darzustellenden  Funktion,  welche  in  dieser  Version 
folgendermaßen  abgetastet  werden: 

In  horizontaler  Richtung  stehen  720  Bildpunkte  zur  Ver¬ 
fügung.  Um  eine  gute  Auflösung  zu  erreichen,  muß  man 
aber  nicht  jeden  einzelnen  Punkt  berechnen,  was  relativ 
lange  dauert  bis  die  Zeichnung  einmal  "steht”.  Es  reicht, 
jeden  dritten  Punkt  zu  nehmen  und  diese  mittels  Linien  zu 
verbinden.  Die  Abtastwerte  werden,  da  Speicher  genug 
vorhanden  ist,  die  Zeit  aber  eventuell  nicht,  in  die  Tabelle 
ftabO  gespeichert,  um  sie  zum  Plotten  nicht  noch  einmal 
berechnen  zu  müssen. 

In  vertikaler  Richtung  stehen  248  Bildpunkte  zur  Verfü¬ 
gung  (von  Logo  werden  496  vorgetäuscht).  Daraus  ergibt 
sich  mit  den  Extremwerten  der  Funktion  der  entspre¬ 
chende  Maßstab  und  die  Funktionswerte  werden  entspre¬ 
chend  skaliert. 

Jetzt  wird  das  eigentliche  Logo-Programm  erstellt  und  als 
Logo-Programmdatei  mit  dem  Namen  PLOT.LOG  in  die 
RAM-DiskM:  geschrieben  (die  folgenden  Zeilenangaben 
beziehen  sich  auf  das  dieses  Programm  erzeugende  Basic- 
Programm).  Das  Logo-Programm  initialisiert  als  erstes 
den  Bildschirm  (Zeile  2280),  indem  es  den  gesamten 
Bildschirm  zur  Grafikdarstellung  bestimmt  (’full  screen’, 
fs),  ihn  "reinigt”  (clean),  die  Schildkröte  versteckt  (hide 
turtle,  hd)  und  den  Zeichenstift  (pen)  deaktiviert  (pen  up, 
pu).  Als  nächstes  wird  das  Achsenkreuz  gezeichnet  (Zei¬ 
len  2290  -  23 10),  der  Zeichenstift  auf  den  ersten  zu  plotten- 
den  Punkt  der  Funktion  positioniert  (Zeile  2320)  und  in 
Zeile  2330  abgesenkt  (pen  down,  pd).  In  der  FOR-Schleife 
(Zeile  2340  -  2360)  werden  240  Logo-SETPOS-Befehle  mit 
den  beim  Abtasten  der  Extremwerte  berechneten  und 
skalierten  Funktionswerten  erzeugt.  Durch  den  abgesenk¬ 
ten  Zeichenstift  werden  die  einzelnen  Punkte  bei  der  Aus¬ 
führung  des  Logo-Programms  durch  "kurze”  Linien  mit¬ 
einander  verbunden. 


Plot  speichern? 


In  Zeile  2365  wird  optional  ein  Logo-Befehl  zum  Spei¬ 
chern  des  aktuellen  Grafikbildschirmes,  d.h.  dergeplotte- 
ten  Funktion,  erzeugt,  wenn  vorher  die  Frage  "Grafik  spei¬ 
chern?”  mit  ’ ’j”  (ja)  beantwortet  wurde.  Warum?  Um  Ihnen 
die  Möglichkeit  zu  geben,  mit  dem  Programm  COPYPIC, 


welches  Sie  ebenfalls  in  dieser  Ausgabe  finden,  die 
Funktion  dauerhaft  zu  Papier  zu  bringen.  Als  Dateina¬ 
men  wird  der  von  Ihnen  angegebene  verwendet,  jedoch 
von  Logo  mit  dem  Typ  .PIC  versehen. 

Als  letztes  wird  durch  den  recycle- Befehl  (Zeile  2370)  eine 
Speicherbereinigung  durchgeführt,  womit  das  Logo- 
Programm  fertig  erzeugt  ist.  Mit  dem  Basic-Befehl  SY¬ 
STEM  wird  wieder  zum  Betriebssystem  zurückgekehrt 
und,  wie  schon  beschrieben,  durch  den  zweiten  Befehl  in 
der  Stapeldatei  Logo  geladen  und  das  erzeugte  Programm 
zur  Ausführung  gebracht.  Hier  sei  noch  einmal  darauf 
hingewiesen,  daß  dadurch  das  Basic-Programm  aus  dem 
Rechner  "verschwindet”.  Deshalb  unbedingt  vor  dem  er¬ 
sten  "Testlauf’  das  Programm  dauerhaft  mit  SAVE 
"PLOT”  auf  Diskette  speichern! 

Nachdem  der  Logo-Interpreter  das  Programm  abgearbei¬ 
tet  hat,  wartet  er  auf  eine  Eingabe  Ihrerseits.  Dies  können 
Sie  aber  nicht  erkennen,  da  der  gesamte  Bildschirm  für  die 
Grafikdarstellung  verwendet  wird  und  kein  Platz  für  den 
Dialog  vorhanden  ist.  Sie  müssen  also,  wie  oben  schon  be¬ 
schrieben,  Ihre  Eingabe  "blind”  tätigen,  wie  z.B.  bye  für  die 
Rückkehr  zum  Betriebssystem. 

(Karl  Rudolf  Meissner/MC) 
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20 

40 

50  c 1 s$  =  CHRS  <27  >  +  "E"  +  CHRS<27>  +  "H” 

60  DIM  f tab (240 ) 

70  PRINT  clsS 

60  PRINT 

90  PRINT  TAB<15) ; "FUNKT IONENPLOT" 

100  PRINT  TAB<15) ; " - •' 

110  PRINT 

120  INPUT  "existiert  die  zu  plottende  Funktion 

schon  (j/n>  ";antwS 
130  PRINT 

140  IF  antw*="j"  THEN  GOTO  250 

150  IF  antwSO"  n"  THEN  GOTO  120 

160  PRINT  "bitte  Funktion  von  ' x'  eingeben;" 

170  PRINT 

180  INPUT  "F  <x>  =  ",FktS 

190  PRINT 

200  INPUT  "unter  welchem  Namen  ablegen  (max.  8 

Zeichen)" ; FktnS 

210  OPEN  "0",l,fktn$  +  "  ,  FKT“ 

220  PRINT  #  1,"  1000  DEF  FNf  <x>  ='* ;  f  kt.$ 

230  CLOSE  1 

240  GOTO  500 

250  FILES  FKT": PRINT: PRINT:  INPUT  "bitte  Dat 


einamen  (ohne  Typ)  angeben  :  " , f ktn$ 

260  'Funktion  zunächst  als  String  einiesen 

270  OPEN  " I" , 1 , f ktn$+" . FKT" 

280  INPUT  #  1,  fkt$ 

290  CLOSE  1 

300  sp  =  INSTR  <f kt$ , " f  <x) M  > 

310  fkt$  =  RIGHT$<fkt$,  (LEN(f kt  $ > -sp+1 ) ) 

320  PRINT  ;  PRINT  :  PRINT  fktSB  :  PRINT 

499  'Funktion  dazuladen 

500  CHAIN  MERGE  f ktn$+" . FKT" , 1000 , ALL 

999  ‘Funktion  definieren 

1000  DEF  FNf <x)=SIN(x) 

2000  'Plot  als  PICture  speichern  für  COPY-PIC? 
2005  PRINT: INPUT  "Grafik  speichern  " ; antwi 
2010  savflg=0: IF  antw$="j"  THEN  savflg=l 
2015  ' Plotbereeich  bestimmen: 

2020  PRINT: PRINT  "bitte  Plot- Interval 1  angeben: 

"  :  PRINT 

2030  INPUT  " Anf angs-X-Vert  =  ",xa 

2040  INPUT  "  End-X-Vert  =  " , xe 
2060  ' Maßstab  in  x-Richtung 

2065  PRINT: PR INT” rechne : " 

2070  dx  =  <xe-xa) /720*3 

2080  'Minimum  und  Maximum 

2090  x  =  xa 

2100  mi  =  FNf(x) 

2110  ma  =  mi 

2120  ftab<0).  =  mi 

2130  FOR  i%=l  TO  240 

2135  PRINT"."; 

2140  x  =  xa  +  dx*i% 


100  CRC  8  ’86 


Bitte  senden  Sie  mir  folgende  Artikel  aus  dem  □  Maliorder  Angebot  □  Clubangebot 

□  Ich  möchte  weitere  Informationen  über  den  Data  Media  Computer- 
Club,  ehe  ich  mich  zu  einer  Mitgliedschaft  entschließe  {2,-  DM  in 
Briefmarken  habe  ich  beigelegt).  Mein  Name  und  meine  Anschrift 
lautet: 


Dalum 


Unterschritt  (bei  Minderjährigen  des  gesetzt  Vertreters) 


uo/zid 


Datum  Unterschritt  (bei  Minderjährigen  Unterschrift  des  gesetzl  Vertreters) 


CPC-Platinen- 
und  Hardware-Service 

Ich  bestelle  hiermit  gemäß  Ihrem  Angebot  aus  "Schneider  CPC  International", 
Ausgabe  7/86,  Schneiderware  #  2: 


.  Stck. 

Basisplatine,  beidseitig  beschichtet,  durchkontaktiert 

24,90  DM 

. Stck 

Basisplatine  kompl  bestückt  u  geprüft,  funktionsfertig 

62,90  DM 

.  Stck 

Centronics-Platine,  einseitig  beschichtet 

17,90  DM 

. Stck 

Centronics-Platine  komplett  bestückt  und  geprüft, 
funktionsfertig 

79,90  DM 

. Stck 

Verbindungskabel  zwischen  Basisplatine  und  CPC  464/664 

39.50  0M 

. Stck. 

Verbindungskabel  zwischen  Basisplatine  u.  CPC  6128 

45,90  DM 

Ausgabe  8/86,  Schneiderware  #  3 

. Stck  V/24  Platine  beidseitig  beschichtet,  durchkontaktiert  29,80  DM 

Stck.  V/24  Platine  kompl  bestückt  und  geprüft,  tunktionsfertig  139,90  DM 


Betrag 


OM 


+  Porto/Verpackung 

(Porto/Verp  Inland  5,-  0M) 

(Porio/Verp  Ausland  8,-  OM) 

DM 

Gesamtbetrag 

DM 

□  Diesen  Betrag  bezahle  ich  mittels  des  beigefügten  Verrechnungsschecks. 

□  Ich  bitte  um  Lieferung  per  Nachnahme  (nur  innerhalb  der  BRD). 

Bei  Nachnahme  kommt  zum  o.g.  Betrag  noch  die  Nachnahmegebühr  hinzu. 


Dalum  Unterschrift  (bei  Minderjährigen  des  gesetzl  Vertreters) 


□  □ 


ö  O 


3  < 

er  o 


o. 

cd 

CD 

O 


»Data  Media  Computerclub« 

Beitrittserklärung 

Ich  möchte  von  den  günstigen  Einkaufsangeboten  des  Data  Media  Com¬ 
puterclubs  Gebrauch  machen  und  beantrage  hiermit  die  Mitgliedschaft  ab 
1 .5.1 986  zunächst  für  ein  Jahr.  Die  Mitgliedschaft  soll  sich  um  jeweils  ein 
weiteres  Jahr  verlängern,  wenn  ich  nicht  3  Monate  vor  Ablauf  des  Zeitrau¬ 
mes  kündige. 

Ich  kann  ab  sofort  aus  dem  Club-Angebot  einkaufen  und  alle  weiteren 
Vorteile  des  Clubs  nutzen.  Der  Clubausweis  wird  mir  nach  Zahlung  des 
Jahresbeitrages  von  60-  DM  zugesandt. 


Vor-  und  Zuname' 


SiiaßerHaus-Ni 


Postleitzahl:  Wohnort 


Beruf 


Geburtsdatum  Telefon 


g 

o 


Dalum  1  Unterschrift  (bei  Minderjährigen:  Vor-  und  Zuname  ß  ges  Vertreters) 

Ich  kann  eine  Woche  nach  Erhall  der  Mitgliedsbestätigung  diesen  Beitritt  schriftlich  widerrufen  Der 
Widerruf  ist  zu  richten  an:  Data  Media  GmbH,  Computerclub,  Ruhrallee  55, 4600  Dortmund  Ich  bestätige 
durch  meine  2  Unterschrift,  daß  ich  auf  dieses  Widerrufsrecht  aufmerksam  gemacht  worden  bin: 


'l 


Uaturn 


2  Unterschrift  (bei  Minderjährigen:  Vor-  und  Zuname  d  ges  Vertre:ers) 


hihi 


2150 

2160 

2170 

2180 

2190 

2200 

2210 

2220 

2230 

2240 

2250 

2260 

2265 

2270 

2275 

2280 

2285 

2290 


. . . . . "in . . . .  mm . . 


Joyce . 


y  =  FNf(x> 
ftab<i%)  =  y 

IF  y>ma  THEN  xoa  =  y  :  GOTO  2190 
IF  y<mi  THEN  ml  =  y 
NEXT  1%: PRINT : PRINT 
PRINT  M  MINIMUM  =  "  ;  ml 

PRINT  '•  MAXIMUM  =  '•  ;  ma 

dy  =  496/ <ma-ml > 

' Skalieren 
FOR  i%=0  TO  240 

f  tab  <17#>  =  ROUND<  <f  tab<17.>-mi  )*dy-248  ,  1) 
NEXT  1% 

PRINT: PRINT" erstel le  Logo-Programm:  “ 

OPEN  " O" , 1 , " M: PLOT .  LOG" 

'LOGO  -Bildschirm  initialisieren 
PRINT  #  1 , " f s  clean  ht  pu" 

'Achsenkreuz  zeichnen 
PRINT  #  1, "setpos  Ä-360  250ü  pd" 


2300  PRINT  #  1, "setpos  a-360  -250ü" 

2310  PRINT  #  1, "setpos  Ä  360  -250ü" 

2320  PRINT  #  1 , " pu  setpos  Ä  -360  " ;ftab<0);"  ü 

2330  PRINT  #  l,"pd" 

2340  FOR  i %=Q  TO  240 

2345  PRINT"."; 

2350  PRINT  #  1, "setpos  Ä" ; i%*3-360 ; "  ";ftab(i 

/*  >  ;  '  ü  " 

2360  NEXT  i% 

2365  IF  savflg  THEN  PRINT  #  l,"savepic  » ; CHR$ < 

34 ) ; f ktn$ 

2370  PRINT  #  1, »recycle" 

2380  CLOSE  1 
2390  SYSTEM 

basic  a : pl ot 
logo. com  m: plat 


Grafik  auf  dem  JOYCE: 


mit  Grafik-  und 

Dieser  Artikel  ist  als  eine  weitere  Anre¬ 
gung  für  die  JOYCE-Besitzer  gedacht, 
um  ihrem  Rechner  ohne  zusätzliche 
Ausgaben  für  Software  etwas  Grafik  zu 
entlocken.  Zwar  kann  man  mit 
Mallard-Basic  nicht  die  hochauflö¬ 
sende  Grafik  benutzen,  wie  es  mit  Logo 
möglich  ist  -  der  Zeichenvorrat  des 
JOYCE  umfaßt  aber  außer  den  ge¬ 
wöhnlichen  alphanumerischen  Zeichen 
eine  große  Anzahl  von  Grafikzeichen 
wie  Striche,  Ecken  etc.  in  unter¬ 
schiedlichen  Formen  sowie  ein  paar 
Sonderzeichen,  die  auch  "grafisch”  ge¬ 
deutet  werden  können.  Mit  diesen  Zei¬ 
chen  kann  man  durchaus  anschauliche 
”Bilder”  darstellen,  wie  anhand  der 
Kirche  in  Bild  1  zu  sehen  ist. 

Betrachtet  man  sich  den  angeblich 
"vollständigen”  Zeichensatz  des 
JOYCE  im  Handbuch,  Anhang  1.4, 
und  versucht,  einige  der  bei  der  Kir- 


Sonderzeichen 


che  verwendeten  Zeichen  wie  die 
Doppelstriche  zu  finden,  so  wird  man 
dieses  vergeblich  tun.  Lediglich  die  in 
der  Tabelle  als  Erweiterungszeichen 
zusammengefaßten  und  nicht  im  De¬ 
tail  aufgeführten  Zeichencodes  128  - 
159  lassen  die  Vermutung  aufkom- 
men,  daß  sich  dort  noch  einige  inter¬ 


essante  Zeichen  verbergen  könnten. 
Der  unermüdliche  Forscher  wird 
sich  also  nicht  scheuen,  mit  Hilfe  des 
folgenden  -  oder  eines  ähnlichen 
Miniprogramms  die  "eventuell”  mit 
den  Codes  verbundenen  Zeichen  auf 
dem  Bildschirm  etwas  näher  zu 
betrachten: 

FOR  i=128  TO  159:  PRINT  i, 
CHR$(i):NEXT 

Und  wie  man  anhand  der  Ausgabe 
zweifelsfrei  erkennt,  bietet  der  Zei¬ 
chensatz  des  JOYCE,  außer  den  dem 
Handbuch  zu  entnehmenden,  schon 
recht  vielfältigen  Zeichen,  noch 
weitere  nützliche  Zeichen  und  Sym¬ 
bole.  Mit  diesen  lassen  sich  z.B.  die 
von  LocoScript  bekannten  Rahmen 
für  Menues  oder  Eingabefelder 
"zeichnen"  -  oder  aber  ’grobe”  Grafi¬ 
ken  wie  die  Kirche  erstellen. 


Grafikzeichen-Tabelle: 


Damit  Sie  nicht  immer  mit  Hilfe  des 
obigen  Einzeilers  auf  die  Suche  nach 


DIE  JOYCE-DATABOX 
SOFTWARE  FÜR  DEN  SUPER  RECHNER 


Jetzt  gibt’s  die  Databox-Disk  auch  für  den  Joyce: 
und  außerdem  als  praktisches  Databox-Abo 

Ule  Joyce-Programme  aus  dem  Heft  finden  Sie  "ready  torun”  auf  unserer  praktischen  Databox. 

Zusätzlich  enthält  die  Jovce-Databox  noch  ein  Bonus-Programm. 

Diesen  Monat:  Such-Rätsel 


Einzelbezug: 

Finzelbezugspreis  für  DATABOX:  Diskette  3”  24,-  DM  zuzüglich  3  -  DM  Porto/V  erpackung 
(im  Ausland  zuzüglich  5,-  DM  Porto/Verpackung). 

Das  Databox-Abo  kostet: 

\ls  Diskette  für  1/2  Jahr  (6  I.ieferungen): 

Im  Inland  und  West-Berlin  150,-  DM,  im  europäischen  Ausland  160,-  DM,  im  außereuropäischen  Ausland  180,-  DM 
Als  Diskette  für  I  Jahr  (12  Lieferungen): 

Im  Inland  und  West-Berlin  300,-  DM,  im  europäischen  Ausland  320,-  DM.  im  außereuropäischen  Ausland  360,-  DM 
In  den  vorgenannten  Preisen  sind  die  Versand-  und  Verpackungskosten  enthalten.  Bitte  benutzen  Sie  für  Ihre  Bestellung  die  Abo- Karte. 
Zahlungsweise:  Am  einfachsten  per  Vorkasse  (V  errechnungsscheck)  oder  als  Nachnahme  zuzüglich  der  Nachnahmegebühr 
 (in  das  Ausland  ist  Nachnahme  nicht  möglich). 
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S*'-DISKETTEN 

Qualität  made  in  Germany 


Mit  der  neuen 

3 "-Diskette  DDM  3-2 

hat  der  Engpaß  ein  Ende. 

100%-ige  Datensicherheit,  jede  Diskette  ist 
geprüft.  Double  sided  double  Face.  Medium 
(Datenträger),  beste  Qualität  zu  vernünftigen 
Preisen. 

Data  Tech  Disketten  gibt  es  jetzt  im  guten 
Fachhandel 


Händleranfragen  erwünscht,  Info  über: 

DATA  TECH  GMBH 

Ruhrallee  55,  4600  Dortmund 
Telefon:  02  31/12  50  74,  Telex:  822  7839  datd 


HIHI  Ml 


1 1 1 1 1 1 1 1 1 1 1 


1 1 1 1 1 1 1 


I  HIHI  IH 


■Joyce . 


Bild  2:  Werte  der  möglichen  Richtungen 


dem  richtigen  Zeichencode  gehen 
müssen,  haben  wir  eine  Tabelle  mit 
den  im  Handbuch  nicht  aufgeführten 
Grafikzeichen  erstellt.  Bei  dieser  sind 
auch  einige  "normale"  bzw.  lan¬ 
desspezifische  Sonderzeichen  zweck¬ 
entfremdet  worden  und  dank  ein 
wenig  Phantasie  zu  einer  grafischen 
bzw.  symbolischen  Bedeutung  ge¬ 
kommen.  Die  Zeichen  wurden  in  der 
Tabelle  entsprechend  ihres  Types  in 
Gruppen  gegliedert.  In  der  ersten 
Spalte  ist  zur  Orientierung  jeweils  die 
Bildschirmdarstellung  des  Zeichens 
zu  sehen,  die  aber  aus  drucktechni¬ 
schen  Gründen  ein  wenig  von  der 
Darstellung  des  Zeichens  auf  Ihrem 
Rechner  differieren  kann.  In  der 
zweiten  Spalte  befindet  sich  der  Zei¬ 
chencode  in  Form  der  Basic-CHR$- 
Funktion,  die  zur  Ausgabe  dieser  Zei¬ 
chen  auf  dem  Bildschirm  notwendig 
ist,  da  die  Zeichen  nicht  durch  einen 
einfachen  Tastendruck  zu  erreichen 
sind.  Zum  Beispiel  wird  der  senk¬ 
rechte  Strich  mit  PRINT  CHR$(149) 
oder  das  Dreieck  mit  PRINT 
C'HRS(27);CHRS(3)  ausgegeben. 


die  Kirche  im  Dorf... 


Als  Demonstration  eines  mit  den 
Grafikzeichen  erstellten  Bildes  dient 

Listing  1:  KIRCHE.BAS 

20  '  Demografik:  Kirche 
100  RESTORB  500:GOSUB  60000 
110  END 
490  1 


die  schon  erwähnte  Kirche  (Listing 
1).  Das  Programm  ist  so  gestaltet,  daß 
es  auch  als  Unterprogramm  in  Ihren 
eigenen  Programmen  verwendet  wer¬ 
den  und  nicht  nur  Kirchen  zeichnen 
kann.  Geben  Sie  zuerst  die  Zeilen  ab 
60000  bis  60200  ein  und  speichern  Sie 
diese  (SAVE  "CH  ARG  RAF”).  Mit 
dem  Befehl  MERGE  ”CHARGRAF” 
können  Sie  nun  die  Routine  in  Ihr 
eigenes  Programm  einbinden  und 
zusammen  mit  diesem  speichern, 
vorausgesetzt,  die  Zeilennummern 
sind  nicht  schon  vergeben.  In  diesem 
Fall  kann  der  von  der  Routine  belegte 
Zeilen  bereich  mit  Hilfe  des  RENUM- 
Befehls  (s.  Basic-Handbuch)  leicht 
geändert  werden. 

Die  Grafik-Routine  kann  dann  ein¬ 
fach  mit  GOSUB  60000  (oder  der  mit 
RENUM  neu  vergebenen  Zeilen¬ 
nummer)  aufgerufen  werden.  Vorher 
muß  jedoch,  wenn  sich  in  Ihrem 
Programm  noch  andere  Daten  in 
Form  von  DATA-Zeilen  befinden 
oder  dieses  mehrere  Bilder  enthält, 
der  Datenzeiger  von  Basic  mit  dem 
RESTORE-Befehl  auf  die  richtigen 
DATA-Zeilen  gestellt  werden. 


Funktion 


Die  Routine  ist  in  der  Lage,  von 
einem  Startpunkt  x,y  (Zeile,  Spalte 
des  Bildschirms)  in  eine  von  acht 
möglichen  Richtungen  eine' gewisse 
Anzahl  gleicher  Zeichen  zu  "plot- 
ten".  Daraus  ergeben  sich  für  jedes 
darzustellendes  Bilddetail  fünf  not¬ 
wendige  Daten  (Parameter),  die  von 
der  Routine  mit  READ  aus  den 
DATA-Zeilen  gelesen  werden. 

Der  erste  Parameter  bestimmt  die 
Zeile  (0  -  31),  der  zweite  die  Spalte  (0  - 
89).  ab  der  gezeichnet  werden  soll. 
Der  nächste  Parameter  bestimmt 
eine  der  acht  möglichen  Richtungen, 
in  die  gezeichnet  werden  soll.  Die 


Werte  der  Richtungen  finden  Sie  in 
Bild  2. 

Als  nächstes  wird  das  Zeichen  be¬ 
stimmt,  mit  welchem  gepiottet  wer¬ 
den  soll.  Dazu  wird  der  dezimale 
Wert  des  Zeichens  angegeben,  den 
Sie  unserer  Tabelle  und  der  Zeichen¬ 
satztabelle  des  Benutzer-Handbu¬ 
ches  entnehmen  können.  Für  den 
Buchstaben  "A”  w'äre  der  Wert  65 
anzugeben. 

Zum  Schluß  folgt  noch  die  Anzahl 
der  darzustellenden  Zeichen  ab  der 
Startposition  in  die  angegebene  Rich¬ 
tung.  Der  Wert  l  würde  die  Ausgabe 
eines  Zeichens  bewirken,  mit  5  wür¬ 
den  entsprechend  fünf  Zeichen  in  die 
angegebene  Richtung  ausgegeben. 
Damit  die  Routine  ihre  Arbeit  auch 
mal  wieder  beendet  und  die  Kontrolle 
zum  aufrufenden  Programm  wieder 
zurückkehrt,  ist  als  letzter  Wert  eines 
zu  zeichnenden  Bildes  für  die  Zeilen¬ 
position  der  Wert  99  anzugeben  (s. 
Zeile  60070).  Dieser  wurde  gewählt, 
da  er  außerhalb  der  zulässigen 
Bildschirmkoordinaten  liegt  und  in 
einer  korrekten  Grafik  nicht  möglich 
ist.  Beachten  Sie  bitte  auch,  daß  eine 
Über-/Unterschreitung  der  zulässi¬ 
gen  Bildkoordinaten  durch  eine  zu 
große  Anzahl  zu  zeichnender  Zei¬ 
chen  in  eine  Richtung  von  der 
Routine  nicht  überprüft  werden  und 
es  daher  zu  ungewollten  Effekten 
kommen  kann. 


Anregungen... 


Da  sich  die  Funktion  der  Routine  nur 
auf  das  Notwendigste  beschränkt, 
wäre  es  interessant,  sie  noch  um 
weitere  "Features”  zu  erweitern.  Z.B. 
könnte  sie  noch  um  die  Möglichkeit 
der  inversen  und  unterstrichenen 
Darstellung  oder  um  weitere  Logo- 
ähnliche  Funktionen  erweitert  wer¬ 
den...  (Jürgen  Keller/MC) 


500  ‘ Datazeile:  Zeile,  Spalte,  Richtung,  Zeichen, 
Anzahl 

510  DATA  8,12,6,134,1,9,12,6,133,18,28,11,4,131,1, 
28,  12,4,61,7,28,  19,4, 137, 1 , 28, 20, 2, 133 , 18,  10,20,2, 
140, 1,9,20,8, 138,7, 10, 10,3,47,5, 10,22, 1,211,5,3, 16 
,6,  167,1: REM  türm 
515  DATA  13,  17, 1,  1 ,  1 

520  DATA  28,20,4,138,45,28,65,4,137,1,28,66,2,133, 
6,22,66,2, 140, 1,21,66,8, 138, 45 , 18 , 20 , 4 , 95 , 43 , 18 , 63 
,5, 211, 4: REM  Kirchenschiff 

530  DATA  4,31,6,35,5,4,35,7,35,2,6,31,5,35,3,4,36, 
6,35,1,6,36,6,35,3,6,38,6,35,3,7,41,8,35,2,6,42,6, 
35,3,7,42,4,35,2,9,42,4,35,2,4,46.6,35,5,6,47,6,35 
,1,6, 48, 6, 35, 3, 6, 50 ,6, 35, 3, 6, 51, 6, 35, 1,7, 51, 6, 34,1 
, 8, 51, 6, 35, 1 , 6, 52, 6, 35,  1, 8, 52, 6, 35,  1, 99: REM  schrif 
t 

60030  ’  GRAFIK  by  JKC1986) 

60040  esc$=CHR$  <27  > :  home$=esc$+"  H"  :  cls$=esc$+”  E”  +h 
omeS 


60050  ch$=esc$+"A"  :  ct$=esc$+“B"  :  cr$-esc$+'‘C"  :  cl$=e 
sc$+" D" : PRINT  cls$ 

60060  ‘X-  und  Y-Koord inate : 

60070  READ  x: IF  x=99  THEN  RETURN 

60080  READ  y: PRINT  esc$  +  "Y" ; CHR$  <32  +  x> ; CHR$  <32  +  y> ; 

:  'positionieren 

60090  ’c  Zeichen  b  in  Richtung  a  zeichnen: 

60100  READ  a : READ  b : READ  c : FOR  i-1  TO  c:ON  a  GOSUB 
60130,60140,60150,60160, 60170,60180,60190, 60200  ' 
Stift  bewegen 

60110  IF  b<32  THEN  PRINT  CHRSs <27 > ; CHRS <b> ; CHR$ <8 ) ; 

ELSE  PRINT  CHR$ <b) ; CHRS <8) ;  'Zeichen  setzen 
60120  NEXT: PRINT  CHRÜ < 13 > : GOTO  60070  'nächster  Str 
ich 

60130  PRINT  ch$; CHRS <8> RETURN: REM  links  schräg  h 
och 

60140  PRINT  chS; : RETURN: REM  hoch 

60150  PRINT  ch$; cr$; : RETURN: REM  rechts  schräg  hoch 
60160  PRINT  cr$; : RETURN: REM  rechts 

60170  PRINT  cr$; ct$; : RETURN: REM  rechts  schräg  runt 
er 

60180  PRINT  et»;  : RETURN:  REM  runter 

60190  PRINT-  ct$;CHR$<8>;  :  RETURN:  REM  links  schräg  r 
unter 

60200  PRINT  clS; : RETURN: REM  links 
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mm 
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Tabelle:  Grafik-Zeichen 


dicker  Strich: 

-  CfflHlM)  Migerecht  voll 

*  CHMÜ52)  Migerecht  halb 
i  CHMÜ43)  sinkrecht  vill 

1  CHJUÜ4S)  senkrecht  halb  eben 
i  CHMÜ48)  senkrecht  halb  inten 
v  CI0t*<14?>  Icke  links  ntn 
r  CHHK1S#)  Icke  links  eben 

*  CHRIÜ53)  Icke  rechts  unten 
s  CHMÜS6)  Icke  rechts  eben 
1  CHM(lSl)  ttweis  rechts 

i  CHRK1S7)  Abwei)  links 

*  CHtt(lSS)  Ab  weis  oben 
t  CM»(158>  Abneij  unten 
+  CHRK1S9)  Kreuiung 

dünner  Strich: 


loppelstrich: 

=  CKMÜ38)  Migerecht 
I  CHM (133)  senkrecht 
t  CNMÜ31)  Icke  links  unten 
f  CHM (134)  Icke  links  oben 
i  CHRK137)  Idee  rechts  anten 

I  CHM<144)  Icke  rechts  oben 

II  CHMÜ3S)  Ai  weil  rechts  donelt 
4  CHMÜ41)  Abweil  links  derpelt 
D  CKMÜ38)  Abweil  rechts  einfach 
4  CHMU38)  Abweij  links  einfach 
t  CHMÜ3S)  Abweis  oben  iwelt 

?  CHM042)  Abweis  «nten  doppelt 
i  CKMU29)  Abweis  oben  einfach 
r  CHFIÜ32)  Abweis  unten  einfach 
i  CHMÜ43)  Kreuiung 


-  CHRK45)  kl.  Stridi  Maserecht  nitte 

.  CHM<35)  sr.  Strich  uaserecht  unten 

I  C *1(343)  Strich  senkrecht 

/  CHRH47)  Schräfstrich  rechts 

\  CKR>(211>  Sohrässtrich  links 

<  CHM(Gt)  Knick  links 

)  CHM(S2)  Knick  rechts 

X  CHM(tt)  Koppe Lkniek 


Sanierte ichen: 

=  CHM(255)  breifiehstrich  Maserecht 

*  CHKS(Si)  boppelstrich  Hagerecht 

'  CHM<34)  boppelstrich  senkrecht  oben 

t  CHM<35)  »enelkrcut 

CNMÜ78)  Icppelpunkt  oben  liegend 
:  CXM(SS)  Doppelpunkt  stehend 
■  CHM<144)  kleiner  Punkt  nitte 

«  CKMÜ2B)  großer  Punkt  nitte 

«  CNMÜ71)  Doppelpfeil  links 

»  CHMÜ72)  Doppelpfeil  rechts 

*  CHFK42)  Stern 

*  CHM(43)  kleines  Kreut 

*  CHRt(llE)  kleiner  Kreis  oben 

*  CKMÜ74)  Hacken 

!  CKM(SS)  Sektglas 
I  CHMUI9)  Pokal 
t  CHMÜI7)  Kreut 
«  CHM<187)  Kreis  leer 

*  CKRK18B)  Kreis  wll 

¥  CHRS42S3)  Pfeil  doppelt  links 

*  CNW<2S2)  Pfeil  doppelt  rechts 


Iscape-Sonderteichen: 

0  CHM(27)iCHM(l)  Xreis  nit  Punkt 
r  CHM(27);CHM<2)  Galgen 

4  CHM<27)jCNM(3)  Dreieck 

»  CHM(27);CKM(4)  Kreis  nit  Kreut 
■  CHM<27);CHM(5)  Kreut 

t  CHM(B7);CHM(6)  Doppelpunkt  nit  Strich 
:  CHRI(27)jCffl|(7)  Dreieck  als  Punkte 
e  C*l(27)jCHM(ll)  Pfeil  links 

4  CHM(27);CHMÜ2)  Pfeil  rechts 
*  CHFI(27);CNS»(14)  Pfeil  links/rechts 


FONTLIB 

-  Zeichensatzverwaltung  für 
DR.  Draw  auf  dem  Joyce 

Die  acht  Zeichensätze,  mit  denen  man  seine  mit  DR.  Draw 
erstellten  Zeichnungen  beschriften  kann,  sind  eine  feine  Sa¬ 
che.  Nicht  ganz  so  schön  ist  die  Tatsache,  daß  immer  nur  drei 
Schriftarten  auf  einmal  verwendet  werden  können.  Und 
schlimm  wird  es  erst,  wenn  man  mal  die  Schriftarten  wech¬ 
seln  will.  Kreuz  und  quer,  hin  und  her  kopieren,  Files  umbe¬ 
nennen,  dann  einen  Merkzettel  an  die  Pinwand  ”FONTA  ist 
GOllTA”...  oder  auch  nicht  ?  Fangen  wir  also  nochmal  von 
vorne  an,  usw... 

Dies  muß  aber  nicht  sein.  Das  Programm  FONTLIB,  ge¬ 
schrieben  in  Mallard-Basic  für  den  JOYCE,  nimmt  dem  An¬ 
wender  diesen  ganzen  ”Verwaltung$kram”  ab.  Sobald  das 
Listing  eingetippt  und  die  Font-Disk  (dt.:  Zeichensatz- 
Diskette)  erstellt  ist,  läuft  alles  (fast)  wie  von  selbst. 


Die  Vorarbeiten: 


Zunächst  müssen  alle  acht  Zeichensatz-Dateien  von  der 
DR.  Draw-Diskette  auf  einer  neuen  Diskette  versammelt 
werden.  Bei  einer  Länge  von  21  kByte  pro  Zeichensatz 
macht  das  genau  168  kByte.  Bleiben  also  auf  einer  172 
kByte- Diskette  noch  4  kByte  für  die  Verwaltung  der  Zei¬ 
chensätze  übrig.  Das  hört  sich  zwar  knapp  an,  ist  aber  kein 
Hindernis,  wie  sich  später  zeigen  wird. 

Aber  fangen  wir  mit  dem  Kopieren  an: 

Man  nehme  eine  formatierte  Leerdiskette  und  die 
Original-DR.  Draw-Diskette  (letzteres  ist  wichtig,  da  es 
sonst  beim  ersten  Programmlauf  zum  Chaos  kommen 
kann:  die  angenommene  Zeichensatzbelegung  könnte  ja 
schon  von  Ihnen  auf  Ihrer  Arbeitskopie  geändert  worden 
sein).  Zunächst  werden  die  unbenutzten  Zeichensätze,  er¬ 


kennbar  an  dem  Dateityp  ”.8”  von  Seite  1  des  Originals  auf 
die  neue  Diskette  kopiert  (s.  auch  Startdiskette  anders  er¬ 
stellt,  Ausgabe  6/86  und  Dr.  Draw-Dokumentation).  Auf 
die  gleiche  Weise  gelangen  die  voreingestellten  Zeichen¬ 
sätze  (Default-Fonts)  von  Seite  2  des  Originals  (erkennbar 
an  dem  Dateityp  ”.BIN”)  auf  unsere  Zeichensatz-Diskette. 
Damit  wäre  die  gröbste  Arbeit  schon  mal  geschafft! 


...und  nun  zum  Programm: 


Seine  Aufgaben  sind  folgende: 

1.  Die  aktuelle  Belegung  der  Default-Fonts  einiesen. 

2.  Diese  momentan  aktiven  Fonts  in  ihren  ursprünglichen 
Namen  umbenennen. 

3.  Vom  Benutzer  die  neuen  gewünschten  Fonts  erfragen. 

4.  Die  Dateien  entsprechend  umbenennen,  so  daß  sie  für 
DR.  Draw  die  Default-Fonts  werden. 

5.  Die  neue  Belegung  speichern. 

Und  das  war’s  auch  schon:  Der  Benutzer  wählt  drei  Zei¬ 
chensätze  aus,  das  Programm  übernimmt  die  Verwaltung 
und  der  Benutzer  braucht  nur  noch  die  drei  Dateien  mit 
den  neuen  aktiven  Zeichensätzen  auf  seine  Arbeits¬ 
diskette  kopieren. 

Das  Gedächtnis  von  FONTLIB  ist  die  Datei  BELEGUNG- 
.AKT.  Sie  enthält  die  internen  Nummern  der  drei  belegten 
Default-Fonts.  Aus  dieser  Nummer  ergibt  sich  der 
ursprüngliche  Name  usw.  Eine  genauere  Beschreibung 
möchte  ich  mir  hier  sparen,  denn  ich  habe  (entgegen  son¬ 
stigen  Gewohnheiten  ???)  ein  recht  gut  dokumentiertes 
Listing  erstellt. 

Der  erfahrene  Programmierer  erkennt  die  Funktions¬ 
weise  des  Programmes  sicher  schnell.  Unerfahrene  sollten 
das  Funktionieren  des  Programms  als  "mystische  Manife¬ 
station  der  Allmacht  der  Technik”  (oder  so  ähnlich) 
interpretieren.  Leider  hat  die  Dokumentation  einen  Nach¬ 
teil:  Das  Programm  ist  zu  lang.  Wir  haben  noch  4  kByte 
frei,  davon  geht  1  kByte  für  das  Gedächtnis  drauf.  Länger 
als  3  kByte  darf  die  Verwaltung  also  nicht  sein. 
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Daher  also  einige  Zugeständnisse  an  Platzmangel  und 
Tippfaulheit: 

Die  REM-  und  Leerzeilen  werden  nicht  angesprungen 
und  können  somit  weggelassen  werden.  Zweitens  ist  das 
Unterprogramm  "Kaltstart”  nur  beim  ersten  Durchlauf 
nötig.  Man  kann  also  das  Programm  auf  eine  andere 
Diskette  speichern,  von  dort  aus  laden  und  vor  dem  Start 
bzw.  spätestens  bei  der  entsprechenden  Aufforderung  die 
Zeichensatzdiskette  einlegen,  damit  die  Gedächtnisdatei 
an  die  richtige  Stelle  kommt.  Wichtig  ist,  daß  Sie  in  dieser 
Phase  einen  kompletten  Programmdurchlauf  machen, 
d.h.  (irgend)eine  vom  Programm  angebotene  Wahl  treffen 
und  nicht  vor  dem  offiziellen  Ende  aufhören,  z.B.  durch 
Drücken  der  STOP-Taste  oder  Ausschalten  des  Rech¬ 
ners. 

Als  nächstes  löschen  Sie  das  Unterprogramm  und  seinen 
Aufruf  (siehe  Listingkommentar)  und,  soweit  nicht  schon 
geschehen,  die  Kommentare  und  speichern  das  neue 
Programm  mit  auf  die  Zeichensatzdiskette  (Tippfaule  er¬ 
halten  mit  der  DATABOX  gleich  beide  Versionen...).  Die 
neue  Programmdatei  ist  dann  nur  noch  3  kByte  lang  und 
paßt  so  gerade  noch  auf  die  Zeichensatzdiskette. 

Wenn  dies  alles  geschafft  ist,  wird  der  Schriftwechsel 
zum  Kinderspiel: 

-  CP/M  booten  (Rechner  einschalten  und  Systemdiskette 
einlegen). 

-  PIP.COM  in  die  RAM-Disk  kopieren  (pip  m:=pip.com) 

-  Mailard-Basic  laden  (basic) 

-  Zeichensatzdiskette  einlegen  und  FONTLIB  laden 
(load  ’Tontlib”  oder  run  ”fontlib”) 

-  Nach  dem  Start  gewünschte  Zeichensätze  wählen 

-  Nach  Arbeitsende  die  drei  neuen  Font-Dateien  mit  PIP 
zunächst  in  die  RAM-Disk  (pip  m:=*.bin)  und  nach  ein¬ 
legen  Ihrer  Arbeitsdiskette  von  dort  auf  selbige  kopieren 
(pip  a:=m:*.bin) 

Falls  einmal  während  der  Arbeit  der  Strom  ausfallen 
sollte,  oder  wenn  aus  irgendeinem  Grund  einmal  alle  acht 
Dateien  mit  ihren  unbenutzten  Namen  auf  der  Diskette 
stehen  sollten,  sich  also  keine  .BIN-Datei  finden  läßt,  so  ist 
dies  keine  ausweglose  Situation. 

In  diesem  Fall  laden  Sie  FONTLIB  und  setzen  im  Listing 
nach  dem  Programmteil  Deklarationen  ein  GOTO 
<***MENU***>.  Damit  überspringen  Sie  den  Teil,  der 
die  Dateien  in  den  Ursprungszustand  zurückversetzt  und 
können  wie  gewohnt  Weiterarbeiten.  Allerdings  dürfen  Sie 
vorher  keine  Namen  verändern!!! 


Noch  ein  Tip:  Falls  Sie  DR.  Draw  auf  der  RAM-Disk 
installiert  haben,  brauchen  Sie  auf  Ihrer  Arbeitsdiskette 
nur  noch  die  drei  aktiven  Font-Dateien.  Das  bedeutet  für 
Sie:  mehrals  100  kByte  Platz  für  Bilder  und  Sie  können  die 
Aufforderung  zum  Disketten-Wechsel  einfach  ignorieren. 

(Michael  Anton/MC) 

10  REX 

20  REX  *•*  FQ1TLIB  -  DR  Draw  Font  Library  *** 
30  REX  ***  1986  by  Xlchael  Anton  *** 

40  REX  ••*•«••**••••••«*•*•***«**«««*«-?********** 

50  : 

60  : 

70  REX - INITIALISIERUNG 


80  : 

90  : 

100  REX  ***  Deklarationen  *** 

110  : 

120  DIX  bezi <8> , font$  <3> , klar*  <8> , bei <3> 

130  : 

140  : 

150  REX  ***  Fllenamen  lesen  #■** 

160  : 

170  DATA  "SIMROH.  8” , "DUPROM. 8"  ,  "COXROM.  8"  ,  " INDROM. 
8" , " INDITA. 8" , "SIMSCR. 8“ 

180  DATA  "COMSCR. 8" , "GOT ITA. 8" , "FOHTA. BIN" , "FONTB. 
BIX", -FOXTC.BIN" 

190  : 

200  FOR  lauf =1  TO  8  :  READ  bez*<lauf>  :  NEXT  lauf 
210  FOR  lauf =1  TO  3  :  READ  font*<lauf)  :  NEXT  lauf 
220  : 

230  REX  ***  Klartext bezeichnung  lesen  *** 

240  : 

250  DATA  SIMPLEX  ROMAN, DUPLEX  ROMAN, CQMPLEX  ROMAN, 
IXDEXICAL  ROMAN 

260  DATA  IXDEXICAL  ITALIC, SIMPLEX  SCRIPT,  COMPLEX  S 
CRIPT, GOTHIC  ITALIC 
270  : 

280  FOR  lauf =1  TO  8  :  READ  klar* (lauf >  :  NEXT  lauf 
290  : 

300  REX  ***  Steuerzeichen  *** 

310  : 

320  clsA=CHR*  <27  >  +" E" +CHRS  <27 ) +« H" 

330  beep*=CHR* <7> 

340  revonS=CHRS  <27  >  +**  p" 

350  re vof f S=CHRi <27 >  +" q" 

360  : 

370  REM  ***  Filenamen  #** 

380  : 

390  bfS=* BELEGUNG. AKT" 

400  : 

410  : 

420  : 

430  REM - HAUPTPRQGRAMM 


440  : 

450  : 

460  REX  ***  Start  *** 

470  : 

480  PRIXT  clsX.beep»  :  FOR  lauf=l  TO  13  :  PRINT  : 

NEXT  lauf 

490  IXPUT  "Bitte  Diskette  mit  Fant  Files  einlegen 
und  <RETURX>  drücken:  " , dummys 


Die  CPC  International 
im  Abonnement: 

Tolle  Programme,  exclusive  Berichte,  die  neueste  Soft-  und  Hardware,  wertvolle 
Tips  &  Tricks  und  alles,  was  Sie  für  Ihren  Schneider  Computer  brauchen. 

Jeden  Monat  neu! 

Bleiben  Sie  am  Ball  -  ein  Schneider  CPC  International-Abo  machts  möglich. 
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Joyce . 


IF  F I HD*  <  bf  * )  =" ' 
cstart  •** 

OFT I OH  RUH 


THEH  GOSUB  1520 


REM  ***  -> 


REM  ***  Belegung  einiesen  *** 

IHPUT  #1, bei (lauf)  :  HEXT  1 


OPEH  " I" , 1, bfÄ 
FOR  lauf =1  TO  3 


CLOSE  1 


620  REM  ***  Files  umbenennen  *** 

630  : 

640  FOR  lauf =1  TO  3 

650  NAME  f  ont£  < lauf  >  AS  bez$ (bei (lauf ) ) 
660  HEXT  lauf 
670  : 

680  KILL  bf* 

6n  0  : 

700  : 

710  REK  ***  Auswahl 

720  : 

730  PRIHT  beep* ; cls* ; revonS ; 


740  PRIHT  "+ - +•' 

750  PRIHT  " !  **  DR  Draw  Font  Library  **  ! " 

760  PRIHT  "!  **  1986  by  M.  Anton  **  !" 

770  PRIHT  "+ - !■"  ;  revoffS 

780  PRIHT  :  PRINT  :  PRINT 


790  PRIHT  “Folgende  Schrifttypen  stehen  zur  Auswah 
1:-  :  PRINT 
800  : 

810  FOR  lauf =1  TO  8 

820  PRINT  TAB (25  > ;  revonJB ;  lauf  ;  revof  f  $  ;  "  =  "  ;  kla 
ri (lauf ) 


830  NEXT  lauf 
840  : 

850  PRINT  :  PRINT  :  PRINT  revon$; 

860  PRINT  "Bitte  wählen  Sie  durch  Eingabe  der  ents 
preehenden  Ziffer,  welche  Schriftart" 

870  PRINT  "DR  Draw  Ihnen  unter  den  folgenden  Menup 
unkten  anbieten  soll revof f$; beepS 
880  : 

890  INPUT  "Als  'SIMPLEX':  ",bel(l> 

900  IF  bei  (1X1  OR  bel(l>>8  THEN  GOTO  890 
910  INPUT  "Als  'COMPLEX':  ",bel(2) 

920  IF  bei  (2X1  OR  bei  (2)  >8  THEN  GOTO  910 
930  INPUT  "Als  'ITALIC  :  ",bel(3> 

940  IF  bei  (3X1  OR  bei  (3)  >8  THEN  GOTO  930 
950  : 

960  IF  bei  <lX>bel  (2)  AND  bei  (2 X>bel  (3)  AND  bei  (3 
>  Obel  (1 )  THEN  GOTO  1060 
970  : 


980  PRINT  beep$; revonS; "  MEHRFACHZU WEISUNG  UNZULÄ 
SSIG  ! ! ! " 

990  PRINT  "  Bitte  Taste  drücken. . . revof f$ ; beepS 
1000  IF  I NKEY£=" "  THEN  GOTO  1000 
1010  GOTO  730 


1020 


103  0  : 

1040  REM  ***  Check  *** 
1050  : 

1060  PRINT  cls$ 


1070  PRINT  :  PRINT  :  PRINT  :  PRINT  "  Die  neue  B 

elegung  ist:  '*  :  PRINT  :  PRINT 

1080  PRINT  TAB(20) ; "Menupunkt" , "Schriftart" 

1090  PRINT  TAB(20) ; " - 

1100  PRINT  TAB (20) ; "  SIMPLEX: " , klarS (bei ( 1 ) ) 

1110  PRINT  TAB (20  > ; "  COMPLEX: ",  klar* (bei <2 > ) 

1120  PRINT  TAB <20 > ; "  ITALIC  : " . klar® (bei (3 ) ) 

1130  : 

1140  PRINT  :  PRINT  :  PRINT  revonS;"Ist  diese  Beleg 
ung  in  Ordnung???" 

1150  PRINT  "Für  neue  Belegung  <N>  eingeben,  sonst 
nur  <RETURN> . . . " ; revof fS; 

1160  INPUT  dummyS 

1170  IF  dummy$="N"  OR  DUMKYS="n"  THEN  GOTO  730 
1180  : 

1190  : 

12ÖÖ  REM  t*t  Files  umbenennen  *** 

1210  : 

1220  FOR  lauf =1  TO  3 

1230  NAME  bez£ (bei (lauf > )  AS  fontS(lauf) 

1240  NEXT  lauf 
1250  : 

1260  REM  ***  neue  Belegung  speichern  *** 

1270  : 

1280  OPEN  "O" ,  1,  bf$ 

1290  FOR  lauf =1  TO  3  :  PRINT  #1, bei (lauf)  :  NEXT 
lauf 

1300  CLOSE  1 
1310  : 

1320  : 

1330  REM - PROGRAMME 

NDE - 

1340  : 

1350  : 

1360  OPTION  STOP 

1370  PRINT  :  PRINT  beepS ; " Bi t te  kopieren  Sie  jetzt 
die  neuen  Font  Files  mit" ;  revoni 
1380  PRINT  " M: PIP  M:=*.BIN  /Diskwechsel/  M: PIP  A: = 
M: *. BINXWü" ; revof fS 

1390  PRINT  "auf  Ihre  DR  Draw  Arbeitsdiskette.  (San 


st  war  alles  umsonst.  .  .  )” 

1400  : 

1410  END  :  REM  - >  evtl,  durch  'SYSTEM'  ersetzen 

1420  ’  um  Basic  automatisch  zu  verl 

assen 

1430  : 

1440  : 

1450  : 

1460  REM - UNTERPROGRAMM 


KALTSTART - 

1470  : 

1480  : 

1490  : 

1500  REM  ■*•**  Default-Belegung  erzeugen  *** 

1510  : 

1520  OPEN  "O" , 1 , bf £ 

1530  PRINT  #1,1  :  REM  — >  FONTA, BIN=S IMROM. 8 
1540  PRINT  #1,3  :  REM  — >  FONTB. BIN=CQMRQM. 8 
1550  PRINT  #1,7  :  REM  — >  FONTC . BIN=COMSCR. 8 
1560  CLOSE  1 
1570  RETURN 
1580  : 

1590  REM  Es  wird  hier  vorausgesetzt,  daß  die  Font 
Files  < ' FONTX. BIN' >  und  die  anderen 

1600  REM  Files  in  ihrer  Benennung  denen  der  Origin 
al  DR  Draw  Diskette  entsprechen 

1610  REM  und  auf  der  FontDisk  vollständig  Vorhände 
n  sind. 

1620  : 

1630  REM  Eine  Vollständigkeitsprüfung  wäre  zwar  mö 
glich,  ist  aber  für  den  einmaligen 

1640  REM  Gebrauch  vollkommen  überflüssig.  Hier  ist 
das  Können  des  Anwenders  gefragt. . , 

1650  REM  Im  übrigen  kann  dieses  Unterprogramm  nach 
der  ersten  Anwendung  entfernt 
1660  REM  werden,  es  muß  allerdings  auch  sein  Aufru 
f  wegfallen.  (Zeile  460-520) 

1670  REM  Auch  müssen  die  REM-Zeilen  entfernt  werde 
n,  damit  das  Programm  noch  auf  die 

1680  REM  Diskette  mit  den  8  Font  Files  passt.  PIP 
sollte  in  der  RAK-Disk  stehen. 

1690  : 

1700  REM  Die  REM-  &  Leerzeilen  werden  an  keiner  St 
eile  angesprungen  und  können 
1710  REM  somit  entfallen, 

1720  : 

1730  REM 
ergnugen  . . 


Viel  V 


Praktische  Textverarbeitung  mit 


JOYCE 

Sch  reib- Praxis  Paket* 

Buch  &  Diskettenpaket  zur  praxisnahen  Anwendung  von  LocoScript 


Ein  Novum  unter  den  Computerbüchern! 


Bunt  gemischtes  Anwender-Paket  für  den 
Joyce-Texter.  Buch  +  Diskette  mit  Wort-Ex¬ 
perimenten,  Tips  und  Tricks,  einem  Layout- 
Archiv,  dem  LocoScript-Software-Training, 
literarischen  Text-Beispielen,  »historischen 
Simulationen,  Insider-Plaudereien  und  feuilie- 
tonistischen  Abwegen«,  theoretischen  Notizen 

und  vieles  mehr. 

Ein  Wegweiser  durch  die  Welt  der  Textver¬ 
arbeitung. 

Abwechslungsreicher  Lesestoff  für  Neulinge 
und  Fortgeschrittene,  der  über  die  Grenzen 
des  Computerschreibtischs  hinausführt. 


Auf  Diskette: 

1.  Der  »LocoScrlpt-Zettelkasten«  bietet 
direkten  Zugriff  auf  zahlreiche  LocoScript- 
Standard-Schablonen  in  über  50  Dateien. 
Dazu:  Mustertexte,  Editierübungen,  Schrift¬ 
beispiele,  Serienbriefe,  Spaltendruck, 
Tabellen,  Telefonregister,  typographische 
Experimente,  Text-Kostproben, 
und  vieles  mehr. 
2.  WordStar-Tastendefinitionsdatei 
mit  Referenzkarte,  WS-Stapeldatei  für 
Startdiskette  (beides  individuell 
anzupassen). 
3.  LOGO-  und  BASIC-Programme  zur 
Erstellung  computergenerierter  Sätze  und 

Gedichte. 


z 

JÜRGEN  SIEBERT 


*Buch  +  Diskette  für  LocoScript  und  WordStar-Autoren  von  DMV 

Ca.  200  Seiten,  Einband:  Leinen-Hardcover 
Buch  und  3”-Diskette  zum  Preis  von  89,-  DM 

Lieferbar  ab  Mitte  September  1 986. 

Zu  beziehen  überden  Computerhandel  und  den  guten 
Fachbuchhandel  oder  direkt  beim  Verlag.  Händleranfragen  erwünscht. 

DMV  Verlag,  Fuldaer  Str.  6,  Postfach  250,  3440  Eschwege 


Serienbriefe  mit  JOYCE 
•••und  noch  einiges  mehr. 


Die  Schwäche  von  LocoScript,  das  Er¬ 
stellen  von  Serienbriefen  mit  Hilfe  von 
Adressdateien,  der  Betrieb  von  Fremd¬ 
druckern  ohne  den  Verlust  der  Layout- 
Möglichkeiten  von  LocoScript  und  die 
Fähigkeit,  Texte  mittels  DFÜ  zu  über¬ 
tragen,  wurde  schon  mehrmals  zu  behe¬ 
ben  versucht.  Die,  meiner  Meinung,  bis 
jetzt  gelungendste  Lösung  dieser  Pro¬ 
blematik  stellt  ein  Programmpaket  der 
Star-Division  dar,  bestehend  aus  Star- 
Mail  und  Datei-Star.  Mit  diesen 
Programmen  wurden  oben  genannte, 
fehlende  Funktionen  sehr  gut  reali¬ 
siert. 

Es  sei  gleich  vorweg  genommen: 

Ein  Eingehen  auf  die  Programme  bis 
ins  letzte  Detail  ist  hier  aus  Platz¬ 
gründen  nicht  möglich.  Das  Haupt¬ 
augenmerk  soll  auf  Star-Mail  liegen, 
welches  "die  Schnittstelle"  zwischen 
LocoScript  und  anderer  Hard-  und 
Software  darstellt.  Der  Datei-Star  ist, 
wie  der  Name  vermuten  läßt,  ein  Da¬ 
tenverwaltungsprogramm,  mit  dem 
die  für  Serienbriefe  nötigen  Daten  er¬ 
faßt  und  verwaltet  werden.  Er  kann 
aber  auch  als  eigenständiges  Pro¬ 
gramm  benutzt  werden. 

Die  Dokumentation  beider  Program¬ 
me  stellt  alle  Arbeitsabläufe  über¬ 
sichtlich  dar  und  dürfte  auch  für  we¬ 
niger  erfahrene  JOYCE-Besitzer  ver¬ 
ständlich  sein.  Bei  Star-  Mail  steht 
sogar  ein  Übungsteil  zur  Verfügung, 
was  leider  (noch?)  nicht  bei  jedem 
Produkt  selbstverständlich  ist. 


Star-Mail 


Mit  Star-Mail  steht  ein  umfangrei¬ 
ches  Programm  zur  Verfügung,  das 


neben  der  Serienbrieferstellung  auch 
Mailing.  Verwaltung  von  Steuerzei¬ 
chen.  Druckeranpassung  usw.  ermög¬ 
licht.  Alle  Funktionen  des  Program¬ 
mes  werden  über  Menues  ausge¬ 
wählt.  Lediglich  die  in  den  zu 
druckenden  Text  bei  der  Erstellung 
mit  LocoScript  einzugebenden  Star- 
Mail-Befehle  (s.u.)  müssen  "gelernt'' 
werden. 

Angenehm  fällt  die  in  Star-Mail 
integrierte  Diskettenverwaltung  mit 
Funktionen  wie  das  Ausdrucken  des 
Inhaltverzeichnisses,  Löschen  und 
Umbenennen  von  Dateien  auf.  So 
braucht  man  z.B.  nicht  das  Programm 
wegen  Platzmangel  auf  der  Diskette 
verlassen,  nicht  mehr  benötigte  Da¬ 
teien  löschen  und  dann  das  Programm 
wieder  starten.  Diese  Funktionen 
sind,  aus  mir  unerfindlichen  Grün¬ 
den,  bei  vielen  anderen  JOYCE- 
Programmen  oft  nicht  implemen¬ 
tiert. 

Der  Text  für  Serienbriefe  wird  wie  ge¬ 
wohnt  mit  LocoScript  erstellt,  wobei 
allerdings  ein  paar  Gestaltungs¬ 
möglichkeiten  LocoScripts  von  Star- 
Mail  nicht  unterstützt  werden.  Dies 
betrifft  u.a.  Kopf-,  Fußzeilen  sowie 
Proportionalschrift  im  Blocksatz. 
Ebenso  kann  nicht  der  gesamte,  von 
LocoScript  bereitgestellte,  Zeichen¬ 
satz  verwendet  werden.  Dieser  kann 
von  Fremd-Druckern  oder  anderen 
Programmen  im  allgemeinen  sowieso 
nicht  verarbeitet  werden.  Für  den 
Verwendungszweck  von  Star-Mail 
stellen  diese  Einschränkungen  also 
keine  großen  Hindernisse  dar.  Als 
"Wiedergutmachung"  bietet  das  Pro¬ 
gramm  dafür  einige  Funktionen,  die 
man  in  LocoScript  vergeblich  sucht. 
An  den  Textstellen,  an  denen  Daten 
aus  einer  Datei-Star-Datei  während 
des  Drückens  eingefügt  werden  sol¬ 
len,  werden  die  einzelnen  Daten- 
Felder  durch  Platzhalter  definiert. 


Dabei  ist  die  Reihenfolge  der  Felder 
gleichgültig  und  auch  eine  mehrfa¬ 
che  Verwendung  möglich.  Zur  Steue¬ 
rung  des  Datenzugriffs  auf  eine 
Datei-Star-Datei  sowie  vieler  ande¬ 
rer,  nützlicher  Möglichkeiten  stehen 
weitere  Kommandos  zur  Verfügung. 
So  kann  der  Druck  zwecks  Typen¬ 
radwechsel  bei  Verwendung11  eines 
solchen  Druckers  angehalten  wer¬ 
den.  "Speicherplätze"  (ähnl.  Varia¬ 
blen  in  Programmiersprachen)  kön¬ 
nen  mit  Daten  (Texte  oder  Zahlen) 
belegt,  rechnerisch  verknüpft  und  an 
beliebiger  Stelle  im  Text  gedruckt 
werden.  Ebenso  können  individuelle 
Eingaben  während  des  Drucks  vorge¬ 
nommen  werden.  Der  den  eingesetz¬ 
ten  Daten  folgende  Text  wird  wieder 
entsprechend  des  Layouts  formatiert, 
man  braucht  sich  also  keine  Gedan¬ 
ken,  um  die  Längen  der  eingesetzten 
Daten  zu  machen.  Lücken  oder  abge¬ 
schnittene  Datenschnipsel  entste¬ 
hen  nicht. 

Damit  bei  Verwendung  von  Fremd¬ 
druckern  deren  Möglichkeiten  voll 
genutzt  werden  können,  bietet  Star- 
Mail  eine  umfangreiche  und  leicht  zu 
bedienende  Anpassungsmöglichkeit 
selbiger.  Dies  umfaßt  die  Steuerzei¬ 
chen  sowie  eine  Konvertierungsta- 
bclle  der  ASCII-Codes  in  die  spezifi¬ 
schen  Drucker-Codes.  Diese  Para¬ 
meter-Liste  kann  für  verschiedene 
Drucker  erstellt,  gespeichert  und  bei 
Bedarf  geladen  werden. 

Ist  der  Text  erstellt  und  der  Drucker 
eingestellt,  so  wird  von  Star-Mail  die 
LocoScript-Datei  konvertiert  (Erstel¬ 
lung  einer  ASCII-Datei  ist  also  wie 
bei  anderen  Lösungen  nicht  not¬ 
wendig  bzw.  erlaubt!)  und,  wenn 
nötig,  aus  einer  Star-Datei  die  ge¬ 
wünschten  Daten  ausgelesen.  Beides 
wird  temporär  in  Dateien  der  RAM- 
Disk  abgelegt,  um  schließlich  wahl¬ 
weise  auf  JOYCE-  oder  Fremd- 
Drucker,  seriellen  Schnittstelle  oder 
in  eine  Datei  ausgegeben  zu 
werden. 


Wertung: 


Mit  diesem  Programmpaket  werden 
die  Einsatzmöglichkeiten  des  JOYCE 
wesentlich  eiweitert  und  ein  effekti¬ 
ves  Arbeiten,  z.B.  bezüglich  der  Ge¬ 
schäftskorrespondenz,  erst  möglich. 
Hersteller:  Star-Division 
Preis:  Star-Mail  98,-  DM 
Datei-Star  98,-  DM 
zusammen  189.-  DM 

(MC) 
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Paint  Master  ist  ein  Malprogramm  für  den  Schneider 
Computer  CPC  464/664/6128,  mit  oder  ohne  Disketten¬ 
laufwerk.  Es  besteht  im  wesentlichen  aus  drei  Teilen  : 

1.  Paint:  ist  das  Ladeprogramm. 

2.  Code:  ist  eine  Binärdatei,  die  die  RSX-Befehle  für  das 
Hauptprogramm  enthält. 

3. Master:  ist  das  eigentliche  Hauptprogramm. 

Nach  dem  Laden  ist  Mode  1  selektiert  und  in  der  Mitte  des 
Bildschirms  sind  zwei  Kreuze  abgebildet:  Ein  kleines  mit 
dem  Namen  ORIGIN  und  ein  großes  Kreuz  mit  dem  Na¬ 
men  TARGET;  letzteres  läßt  sich  mit  Hilfe  der  Cursorta¬ 
sten  oder  eines  Joysticks  bewegen. 

Wenn  Sie  die  Space-Taste  drücken,  erscheint  der 
Helpscreen  auf  dem  Bildschirm.  Hier  finden  Sie  alle  Mal¬ 
hilfen  mit  den  dazugehörigen  Tastenbelegungen.  Die 
Malhilfen  unterteilen  sich  in  zwei  Gruppen:  Einmal  die 
mit  direkter  Wirkung  (d.h.  sofort  nach  dem  Drücken  der 
entsprechenden  Taste)  und  zum  anderen  mit  indirekter 
Wirkung,  wobei  die  Funktion  erst  mit  Drücken  der  Copy- 
cursortaste  oder  des  Feuerknopfes  aktiviert  wird. 

Beschreibung  der  Funktionen  mit  Direktwirkung: 

ZOOM: 

Der  gesamte  Grafikbildschirm  ist  in  64  gleichgroße  Berei¬ 
che  unterteilt  und  jener,  in  dem  sich  TARGET  befindet, 
wird  achtfach  vergrößert  dargestellt.  Ein  blinkender 
Cursor  markiert  die  ständige  Position.  Punkte  werden  in 
der  aktuellen  Penfarbe  mit  der  Copy-Taste  (bzw. 
Feuerknopf)  gesetzt  oder  mit  der  DEL-Taste  gelöscht. 
Nach  zweimaligem  Drücken  der  großen  ENTER-Taste 
wird  das  Bild  wieder  verkleinert  und  mit  den  Korrekturen 
an  die  alte  Stelle  geblendet. 

SWAP: 

Vertauscht  die  Bereiche,  in  denen  sich  Origin  und  Target 
befinden  sowie  deren  Koordinaten 

FIND: 

Umrahmt  den  Teilbereich,  in  dem  sich  Target  befindet. 
TEXT: 

Alle  256  Symbole  des  Zeichensatzes  können  mittels  Steue¬ 


rung  frei  ausgewählt  werden.  Anschließend  kann  die  so 
ausgewählte  Zeichenkette  in  Originalgröße  mittels  Copy- 
Taste  im  Ursprung  von  Target  ausgegeben  werden. 

SYMBOL: 

Ermöglicht  die  Definition  eigener  Grafikzeichen.  Nach¬ 
dem  das  gewünschte  Symbol  mit  Hilfe  der  Cursortasten 
ausgewählt  wurde,  beginnt  der  Entwurf  des  Zeichens. 
Hierzu  ist  der  Cursor  in  einer  9*8-Matrix  abgebildet.  Jetzt 
gibt  man  einen  64  Zeichen  langen  String  ein,  der  aus  Nul¬ 
len  und  Einsen  besteht  und  schließt  mit  ENTER  ab. 

Das  Aussehen  des  Zeichens  wird  durch  die  Zahlen 
(0= paper/ l=pen)  bestimmt. 

PEN: 

Der  alte  Farbstift  wird  angezeigt,  einen  neuen  kann  man 
in  den  Grenzen  des  Mode  wählen. 

INK: 

Anzeige  der  INK-  und  Farbtabelle.  Änderung  durch 
Eingabe. 

BORDER: 

Rahmenfarbe  und  Farbtabelle  werden  ausgegeben  und 
können  geändert  werden. 

MODE: 

Ändern  des  Screen-Mode  und  Löschen  der  Grafik. 

WRITE: 

Schreibmodus  der  Grafik  VDU  kann  geändert  werden. 
Defaultwert  ist  0  (Normal).  Die  Modi  1  -  3  entsprechen  den 
logischen  Verknüpfungen  XOR,  AND  und  OR. 

STEP: 

Die  Schrittweite  des  Cursors  kann  im  Rahmen  von  1  -  80 
Pixel  geändert  werden.  Standardwert  ist  4. 

SAVE: 

Nach  der  Eingabe  des  Dateinamens,  der  aus  Gründen  der 
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Diskettenkompatibilität  nicht  länger  als  acht  und  mini¬ 
mal  ein  Zeichen  lang  sein  muß,  wird  abgefragt,  ob  man  das 
komplette  Bild  oder  nur  einen  Teilbereich  abspeichern 
will.  Ein  Teilbereich  wird  durch  die  Teilbereiche  begrenzt, 
die  von  dem  Rechteck  zwischen  Origin  und  Target  berührt 
werden. 

LOAD: 

Lädt  eine  Bilddatei 
MERGE: 

Lädt  ein  Teilbild  wieder  an  seine  ursprüngliche  Position, 
ohne  den  Rest  des  Gesamtbildes  zu  beeinflussen. 

MOVE: 

Verschiebt  Origin  nach  Target 
SETUP: 

Ist  die  jeweilige  indirekte  Funktion,  die  vorher  angewählt 
wurde  und  erst  mit  Drücken  der  Copy-Taste  gestartet  wer¬ 
den  kann.  Die  einzelnen  Möglichkeiten  sind:  PLOT, 
DRAW,  REC,  BOX,  CUBE,  CIRCLE,  SPOT,  FILL, 
SPRAY,  PRINT,  LARGE,  CLG,  PCLS,  INVERT  und 
COPY. 

ERASE: 

Ist  das  gleiche  wie  Setup,  nur  das  hier  mit  PEN  0 
gearbeitet  wird. 

HELP: 

Aktiviert  die  Helpscreen 

EXIT: 

Zweimaliges  Drücken  der  kleinen  ENTER-Taste  er¬ 
möglicht  ein  Verlassen  des  Programms. 

Einzelbeschreibung  der  Funktionen  mit  indirekter 
Wirkung: 

PLOT: 

Setzt  einen  Punkt  in  das  Zentrum  von  Target 

DRAW: 

Verbindet  Origin  und  Target  mit  einer  Linie 
REC: 

Zeichnet  ein  Rechteck  mit  den  Eckkoordinaten  von  Origin 
und  Target 

BOX: 

Wie  REC  nur  ausgefüllt 
CUBE: 

Zeichnet  einen  Quader  in  3D- Darstellung.  Origin  ist 
hierbei  ein  Eckpunkt  der  Frontfläche. 

Der  erste  Standort  von  Target  gibt  die  Richtung  der  schräg 
verlaufenden  Seitenlinien  ausgehend  von  Origin  an,  und 
der  zweite  Standort  von  Target  definiert  den  zweiten 
Eckpunkt  der  Frontfläche. 

CIRCLE: 

Zeichnet  einen  Kreis  bzw.  eine  Ellipse  mit  dem  Zentrum 


Für  unsere  ständige  Joyce-Rubrik  suchen  wir 
noch 

Programme 
Tips  +  Tricks 

zur  Veröffentlichung.  Honorar  nach 
Vereinbarung. 

Einsendungen  an: 

DMV  Daten  &  Medien  Verlagsges.  mbH, 
Fuldaer  Str.  6,  3440  Eschwege 
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Origin  und  dem  Radius,  der  sich  aus  dem  horizontalen 
und  vertikalen  Abstand  von  Target  zu  Origin  ergibt. 
SPOT: 

Wie  CIRCLE  nur  ausgefüllt 
FLLL: 

Füllen  einer  geschlossenen  Fläche  in  Penfarbe  ausgehend 
von  Target  Bei  komplizierten  Flächen  mehrmals  füllen. 
SPRAY: 

Die  Fläche  zwischen  Origin  und  Target  wird  mit  zufälli¬ 
gen  Plotpunkten  gesprenkelt. 

LARGE: 

Gibt  die  Zeichen,  die  mit  TEXT  eingegeben  wurden,  in 
vergrößerter  Darstellung  aus.  Origin  bildet  den  unteren 
rechten  Eckpunkt  des  ersten  Zeichens  an,  Target  den  linken 
oberen  Eckpunkt.  Andere  Stellungen  von  Origin  und  Tar¬ 
get  bringen  Spiegelungseffekte. 

CLG: 

Das  Rechteck  zwischen  Origin  und  Target  wird  ge¬ 
löscht. 

PCLS: 

Löscht  den  Teilbereich,  in  dem  sich  Target  befindet 
INVERT: 

Invertiert  den  Teilbereich,  in  dem  sich  Target  befindet. 
COPY: 

Kopiert  den  Inhalt  des  Teilbereichs,  in  dem  sich  Origin  be¬ 
findet,  nach  dem  Teilbereich  von  Target. 

Beschreibung  der  RSX-Befehle: 

GPEN,n: 

Setzt  den  Grafikfarbstift 

FILL: 

Füllt  eine  umschlossene  Fläche  oder  bis  an  die  Grenzen 

des  Grafikwindows 

KEEP,n: 

Kopiert  den  Teilbereich  n  in  einen  250  Bytes  großen  Buffer 

ab  Adresse  32768 

SHOW,n: 

Lädt  Teilbereich  n  mit  dem  Inhalt  des  Buffers. 

SWAP,n: 

Vertauscht  Teilbereich  n  mit  Inhalt  des  Buffers 

ZOOM: 

Vergrößert  den  Inhalt  des  Buffers  um  das  Achtfache 
REDUCE: 

Verkleinert  den  Bildschirm  und  legt  den  Inhalt  im 

Buffer  ab 

PCLS,n: 

Löscht  Teilbereich  n 
INV,n: 

Invertiert  Teilbereich  n 
PAGE,n: 

Wechselt  Speicherbank  des  Bildschirms 


SchneiderCPC  464  CPC  664  CPC  61 28  und  Joyce 

Wir  bieten  an: 

Finanzbuchhaltungsprogramm 

Erstes  Programm  mit  Rückgaberecht 

Ein  Vertrauensbeweis,  verbunden  mit  der  Qualität 
unseres  Programmes.  Programmpflege  und  Service 

Information  02306/491 72 

nur  499,-  DM 

Automatische  Prüfroutinen  u.  Stornierung,  unzulässige 
Buchungen  nicht  möglich,  daher  auch  von  Laien 
sofort  anwendbar. 

DAST-Mobil  GmbH  Abt  EDV,  Saarbrückerstr.  56, 4670  Lünen 
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n=0  für  Bank  1  (16384  -  32767) 
n=l  für  Bank  3  (49152  -  65535) 

Anweisungen  zum  Eintippen: 

Listing  1  eintippen  und  abspeichern  mit: 
SAVE  ”PAINT” 

Listing  2  eintippen,  irgendwo  mit  "CREATOR”  abspei¬ 


chern,  mit  RUN  starten  und  den  erzeugten  Code  direkt 
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hinter  "PAINT”  abspeichern  lassen. 

Listing  3  eintippen  und  hinter  CODE  mit: 

SAVE  "MASTER”  abspeichern 

Zum  Einladen  RUN  ”PAINT”  eingeben. 

(Th.  Fippl) 

Listing  1 

100  DEFINT  a-z 

[5531 

110  SYMBOL  AFTER  0 

[1116] 

120  hm=UNT(HIMEM+1 ) 

[517] 

130  MEMORY  &94FF 

[7821 

140  OPENOUT"dummy 

[1022] 

150  MEMORY  &3FFB 

[762] 

160  CLOSEOUT 

[902] 

170  POKE  &9400 ,hm  AND  &FF 

[1306] 

180  POKE  &9401  ,PEEK(@hm+1  ) 

[1738  ) 

190  FOR  n=72  TO  75 

[1145) 

200  KEY  DEF  n,1 ,n+168 

[11  54  ] 

210  NEXT 

[3501 

220  KEY  DEF  76,1 ,224 

[1015] 

230  KEY  DEF  66,0,0,0 

[929  1 

240  KEY  1 39 ,CHR$ ( &FF ) 

[1497] 

250  SPEED  KEY  12,1 

(1212) 

260  LOAD" 1 code", &9500 

[6631 

270  CALL  &9S14 

[682] 

280  RUN" imaster 

[487  ] 

Listing  2 

100 

DEFINT  a-z :m=& 9500 : MEMORY  m-1 

[15151 

110 

FOR  j 

>=200  TO  272 

[1112] 

120 

S=0:FOR  m=m  TO  m+7 

[1286  ] 

130 

READ 

b$ : b=VAL ( "& " +b$ ) 

[1052  ] 

140 

POKE 

m,b:s=[s  XOR  b)+b 

(1182) 

150 

NEXT: 

:READ  sum 

[13321 

160 

IF  S- 

-sum  THEN  PRINT" Error  in"z:STOP 

[1529] 

170 

NEXT: 

:  PRINT 

[811  1 

180 

SAVE' 

1  code", b,&9500, 584 :END 

[1587  ) 

190 

: 

[174] 

200 

DATA 

eb,22,0b,97,c9,21  ,00,80,1386 

[1431  ] 

201 

DATA 

1 8,04, eb,1  1  ,00,80,01  ,fa, 562 

[1427] 

202 

DATA 

00,ed,b0,c9,21 , Id, 95, 01  ,1036 

[1516  ] 

203 

DATA 

21 ,95, c3, dl ,bc, 00, 00, 00, 11 56 

[2336] 

204 

DATA 

00,41 ,95,c3,6b,95,c3,7f ,534 

[17301 

205 

DATA 

95,c3,96,95,c3,90,95,c3,736 

[1114] 

206 

DATA 

ae,95,c3,f9,95,c3,2b,96,1592 

[2146  ] 

207 

DATA 

c3,42,96,c3,48,96,c3,d6,2146 

[1717  ] 

208 

DATA 

96, 53, 48, 4f,d7, 4b, 45, 45, 920 

[17401 

209 

DATA 

d0,49,4e,d6,50,43,4c,d3,1194 

[1503  ] 

210 

DATA 

5a, 4f,4f, cd, 52, 45, 44, 55, 1050 

[17651 

211 

DATA 

43,  c5, 53, 57, 41  ,d0,50,41 ,852 

1968] 

212 

DATA 

47, c5, 46, 49, 4c, cc, 47, 50, 1088 

[991  ] 

213 

DATA 

45,ce,00,cd,ed,96,eb,c5,1562 

[1866  ] 

214 

DATA 

d5,06,00,ed,b0,e3,cd,26,1552 

[1367  ] 

215 

DATA 

bc,eb,e1 ,c1 ,10, fl, c9, cd, 1512 

[1558] 

216  DATA  ed,96,c5,e5,06,00,ed,b0,496  [917] 

217  DATA  ei ,cd,26,bc,c1 , 1 0 , f 3 , c9 , 1 566  [16771 

218  DATA  dd,21 ,3f ,97, 18,04, dd, 21 ,944  [17781 

219  DATA  42,97,cd,ed,96,c5,e5,cd,780  [10101 

220  DATA  46, 97, 23, Od, 20, f9, ei , cd, 772  [875] 

221  DATA  26,bc,c1 ,10,f0,c9,Cd,21 ,1548  [13481 

222  DATA  97 , 5f ,3e, 02 , 93 , fe, 01 , 1 7 , 1 270  [11011 

223  DATA  5f ,c5 , 48 , 05 ,cd ,c4 , 95 ,c1 , 1 288  [1499] 

224  DATA  Od, 20 , f 6 ,c9 ,c5 , 7e , cb,26 , 1 444  [2143] 

225  DATA  a2 , 4f ,cb , 39 , bl , 1 0 , fb,cd , 1 288  [15231 

226  DATA  d8 , 95 ,c1 , Od, 20 ,ee, 23 ,c9 , 978  [1941] 

227  DATA  e5 ,d5 , 57 , Oe, 08 , 2a , 02 , 94 , 906  [14271 

228  DATA  e5 , 43 ,e5 , 72 ,23 , 1 0 , fc ,e1 , 1 226  [2018] 

229  DATA  cd , 26 , bc , 43 , Od, 20 , f 3 , ei , 1 1 86  [1347] 

230  DATA  23, 10, fd, 22, 02, 94, dl , ei ,1068  [1934) 

231  DATA  c9, cd, 21 ,97,57, 3e, 02, 92, 926  [2120] 

232  DATA  f e, 01 , 1 7 ,e5 ,c5 , f 5 ,cd , 1 2 , 1 484  [1048] 

233  DATA  96 , f 1 ,c1 , ei , 72 , 23 , Od, 20 , 1 062  [1159] 

234  DATA  f 2,c9 , 48 , 47 , 1 6 , 00 , 2a, 02 , 71 6  [1710] 

235  DATA  94 ,c5 , 7e,a3 ,cb ,22 , b2, 57 , 1 820  [767] 

236  DATA  23 , 1 0 , fd,c1 , Od , 20 , f 2 , 22 , 1 036  [2093) 

237  DATA  02 , 94 ,c9 ,cd ,ed , 96 ,c5 ,e5 , 1 702  [2742] 


238  DATA  1 a , 46 , 77 , 78 , 1 2 , 23 , 1 3 , Od, 448  [1766] 

239  DATA  20 , f 6 ,e1 ,cd, 26 , bc , cl , 1 0 , 1 086  [14091 

240  DATA  ed,c9,7b,2f,0f,c3,08,bc,1l88  [20791 

241  DATA  cd, c6,bb,cd,1  1 ,bc, 28, 06,1292  [16061 

242  DATA  30 , 08 ,cb , 3a ,cb , 1 b,cb, 3a , 964  [1797] 

243  DATA  cb , 1 b,cb, 3c, cb , 1 d ,d5 , 7d, 1 382  [1479] 

244  DATA  dd , 6f ,dd , 67 , cd ,c8 , 96 , 30 , 1 626  1898) 

245  DATA  06 ,cd , 7a , 96 , 1 3 , 1 8 , f 5 ,d1 , 1 484  [1099] 

246  DATA  1 b,cd ,c8 , 96 ,d0 ,cd , 7a , 96 , 758  [1600] 

247  DATA  18,f6,e5,2a,04,94 ,e5,cd,1 242  [981] 

248  DATA  29 , bc , dd , 2c, cd , 9e , 96 , 38 , 1 430  [1914] 

249  DATA  f6, dd, 7c, dd,6f, ei , cd, 26,1106  [1842] 

250  DATA  bc,dd,2d,cd,9e,96,38,f6,1246  [1905] 

251  DATA  ei ,dd,7c,dd,6f ,c9,cd,aa,1 328  [2073] 

252  DATA  96 ,d0 , 7e, al , 37 ,cc, e2 , 96 , 1 900  [10371 

253  DATA  3f ,c9 ,dd , 7d , f e, c8 ,d0 ,d5 , 1 730  [2193] 

254  DATA  e5 , eb,cd , 1 1 , bc , 1 1 , aO , 00 , 1 002  [2239] 

255  DATA  38,08,11,40,01,28,03,11,316  [9711 

256  DATA  80 , 02 ,a7 ,ed, 52 , ei ,d1 ,c9 , 1 502  [1883) 

257  DATA  e5 , d5 ,cd , Id , bc , dl , 22 , 04 , 1 1 30  [1126) 

258  DATA  94 , cd , 9e , 96 ,e1 , c9 , 7b, cd , 1 026  [1148) 

259  DATA  de , bb , 7b, cd , 2c, bc , 32 , 06 , 1 41 4  [925] 

260  DATA  94,c9,3a,06,94,47,7e,a8,1112  [1518] 

261  DATA  bl , a9 ,a8 , 77 , c9 , 7b ,e6 , 07 , 1 636  [610] 

262  DATA  87 , 4f  ,  87 , 87 , 81  , 4f ,cb , 3b, 1 076  [2049] 

263  DATA  cb,3b,7b,e6,fe,21 ,11 ,97,1 340  [1369] 

264  DATA  85 , 6f  ,  7e , 23 , 66 , 81  , 6f , 8c , 1 1 02  [1206] 

265  DATA  95 , 67 , 1 1  , 00 , 80 , 01  , Oa , 1 9 , 446  [603] 

266  DATA  c9 , 00 ,c0 , f 0 ,c8 ,e0 ,d1 ,d0 , 1 44 4  [8461 

267  DATA  da,c0,e3,b0,ec,a0,f5,90,1932  [1502] 

268  DATA  f e, 21 , 00 , 40 , 22 , 02 , 94 , 26 , 51 0  (1688) 

269  DATA  80 ,cd , 11 , bc , 1 1 , 55 ,aa , 01  , 758  [1424  ] 

270  DATA  fa, 02, d8, 11 ,11 ,88,06,04,520  [1190] 

271  DATA  c8, 11 ,01 ,80, 06,08, c9, 36, 610  [15201 

272  DATA  00 ,c9 , 7e , 2f  ,  77 ,c9 , dd ,e9 , 1  408  [1098] 


Listing  3 


100  .................  t526] 

110  '•  *  [175] 

120  '*  PA INT-MASTER  *  [343] 

130  '•  (c)  1985  *  15421 

140  '  •  by  Th.  Fippl  *  [7231 

150  '*  6336  Solms  *  [754] 

160  '•  *  [175] 

170  .................  [528 ] 

180  '  [117] 

190  '  (117] 

1000  CLEAR: DEG  [381] 

1010  DEFSTR  a-k: DEFINT  m-Z  [955] 

1020  FOR  n=0  TO  2:x=14-2*n  11254] 

1030  FOR  m=1  TO  x:READ  y  [8821 

1040  cmd(n) =cmd(n)+CHR$ (y )  [886] 

1050  NEXT  m,n:DIM  vi(15)  [12571 

1060  FOR  n=0  TO  1 5 : READ  m  11174] 

1070  INK  n,m:vi(n)=m: NEXT  [1664] 

1080  BORDER  2: ZONE  42  [1436] 

1090  xa=320 :ya=200 :xb=xa:yb=ya  [2874] 

1100  md=1 :sz=2:pz=3:stx=4:sty=4:pn=1 :vb=2  [31201 

1110  mtx=UNT(PEEK{ &9400)+256  *PEEK( &9401  ) )  [2002] 

1120  :  [174] 

1130  DATA  &47,&44,&52,&59,&41  ,&43,&45  [1226] 

1140  DATA  &51 , &46 , &4a , &1 0 , &4f , &58 , &48  [1245] 

1150  DATA  &20,&50,&49,&42,&54,&56  [1202] 

1160  DATA  &4b,&57,&4d,&53,&4c,&55  [932] 

1170  DATA  Sf0,&f1 ,&f2,&f 3,&e0  [1336] 

1180  DATA  S7f ,&0d,&4e,&09,S5a  [1514] 

1190  DATA  1,24,15,6,26,0,2,11,8,10,12,14,1  [2406] 

6,18,20,22 

1200  :  [1741 

1210  ON  ERROR  GOTO  5570  [1344] 

1220  MODE  md :  i PAGE , 0  [1031] 

1230  GOSUB  1390  [9331 

1240  i=UPPER$ ( INKEY$ )  [1461] 

1250  IF  i=" "GOTO  1240  [485] 

1260  GOSUB  1390  1933) 

1270  IF  i =CHR $ ( &FF ) GOTO  5470  [1  333  ] 

1280  :  [174] 

1290  m= INSTR ( cmd ( 0 ) , i )  [515] 

1  300  IF  m  THEN  z=*m:GOTO  1230  [2745] 

1310  m= INSTR ( cmd ( 2 ) , i )  [355) 

1320  ON  m  GOSUB  2000,2040,2080,2120,2160,3  [3857] 
860,3720,3650,3760,3320 

1 330  m=INSTR(cmd(1 ),i)  1243] 

1340  IF  m=0  GOTO  1230  [1011] 

1350  ! PAGE, 1: MODE  1 :LOCATE  2,2  [1948] 

1360  ON  m  GOSUB  3930,4170,4240,4360,4430,4  13623) 
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510,4680,4780,4900,4990,5270,5370 
1 370  GOTO  1220  [359 ] 

1  380  :  [174] 

1  390  PRINT  CHR$  (  23  )  CHR$  ( 1  )  ;  [1919] 

1400  IF  z=2  THEN  MOVE  xb,yb:DRAW  xa,ya,pn  [3047] 

1410  MOVE  0,ya:DRAWR  640,0,1  [2137] 

1420  MOVE  xa,0:DRAWR  0,400  [1904] 

1430  MOVE  xb-8 , yb-8 : DRAWR  16,16  [517] 

1  440  MOVE  xb+8,yb-8:DRAWR-16,16  [1  305  ] 

1450  PRINT  CHR$( 23 )CHR$(wr) ;  [2028] 

1460  RETURN  [555] 

1470  :  [174] 

1480  m=INT(xa/80 )  [649] 

1490  n=INT( (399-ya)/50)  [1339] 

1500  num=n*8+m:RETURN  11172) 

1510  :  [174] 

1520  RESTORE  1620:LOCATE  18,3  (1609) 

1530  PRINT  CHRS ( 24 ) "  Farbpalette  "CHR${24)  [4105] 

1540  FOR  n=0  TO. 12  [564] 

1550  READ  a , b : LOCATE  12,6+n  [1428] 

1560  PRINT  USING"##  "+a;n;  [898] 

1570  PRINT  TAB (26 ) US ING"##  "+b;n+13  [1178) 

1580  NEXT: LOCATE  26,19  [1053] 

1590  PRINT"26  h,  Weiss  [1879] 

1600  RETURN  [555] 

1610  :  (1741 

1620  DATA  Schwarz, Weiss, Blau, Pastellblau  [1192] 
1630  DATA  Hellblau, Orange, Rot, Rosa  [1123] 

1640  DATA  Magenta, Pastellmag. ,h.  Violett  [2309] 

1650  DATA  Hellgruen, Hellrot, Seegruen  [1931] 

1660  DATA  Purpur, h.  Blaugr.,h.  Magenta  [1723] 

1670  DATA  Limonengr. ,Gruen,Pastellgr.  [2531] 

1680  DATA  Blaugruen,Pa.  blaugr. , Himmelblau  [3042] 
1690  DATA  Hellgelb, Gelb, Pastellgelb  [1265] 

1700  :  [174  ) 

1710  x=60:y=340:p=0:TAG: |GPEN,1  [2556] 

1720  FOR  n=0  TO  15:FOR  m=0  TO  15  [2101] 

1730  MOVE  66+m*32,336-n*20  [1782] 

1740  PRINT  CHR$(n‘16+m) ;  [1484] 

1750  NEXT  m , n : TAGOFF :  j GPEN , 2  [  1 304  J 

1760  PRINT  CHR$(23  )CIIR$(  1  )  ;  [1919] 

1770  RETURN  [555] 

1780  :  [174] 

1 790  GOSUB  1960  [851  ] 

1800  i= INKEY $:IF  i=""GOTO  1800  [1092] 

1810  m= INSTR ( LEFT$ ( cmd ( 2 ) , 7 ) , i )  [1508] 

1820  GOSUB  1960  ‘  [851  ] 

1830  IF  m >4  THEN  RETURN  [1157] 

1840  ON  m  GOSUB  1870,1890,1910,1930  [2562] 

1850  GOTO  1790  (341  ] 

1860  :  [174] 

1870  y=y+20 : IF  y>340  THEN  y=40:q=240  ELSE  (2883) 
q=-1  6 

1880  p=p+q ; RETURN  [884] 

1890  y=y-20 : IF  y<40  THEN  y=340 :q=-240  ELSE  13569] 
q=1  6 

1900  p=p+q: RETURN  [884] 

1910  x=x-32 : IF  x<60  THEN  x=540:q=15  ELSE  q  [2345] 
=-1 

1920  p=p+q: RETURN  [884] 

1930  x=x+32 : IF  x>540  THEN  x=60:q=-15  ELSE  [4077] 
q  =  1 

1940  p=p+q : RETURN  [884] 

1950  :  [174] 

1960  MOVE  x , y : DRAWR  26,0  [920] 

1970  DRAWR  0 , -22 : DRAWR-26 , 0  [1427] 

1980  DRAWR  0,22: RETURN  [1586] 

1990  1  (H7) 

2000  '***  CURSOR  UP  ***  [847] 

2010  *  [117] 

2020  ya=MIN ( ya+2 *sty , 399): RETURN  [2251  ] 

2030  '  [117] 

2040  '•**  CURSOR  DOWN  *•*  [1410] 

2050  '  [117] 

2060  ya=MAX ( ya-2  *sty , 0 ) : RETURN  [3110] 

2070  '  (117] 

2080  '***  CURSOR  LEFT  ***  [1168] 

2090  '  [117] 

2100  xa=MAX ( xa-sz  *stx, 0 ) : RETURN  [3043] 

2110  •  [H7] 

2120  '*•*  CURSOR  RIGHT  [1062] 

2130  '  [117] 

2140  xa=MIN { xa+sz  *stx, 639 ) : RETURN  [3437] 

2150  ’  [117] 

2160  '***  SETUP  ***  [649] 

2170  '  [117] 

2180  !  GPEN , pn  (854  ) 

2190  ON  z  GOTO  2220,2260,2310,2370,2430,26  [3907] 
10,2690,2770,2940,2980,3050,3120,31 60,3200 


Programmierer 
gesucht 


Zur  Verstärkung  des  Redaktionsteams  und  im 
Hinblick  auf  mögliche  neue  Publikationen  su¬ 
chen  wir  erfahrene  Programmierer,  die  sich  in 
folgenden  Hochsprachen  auskennen: 

-  Forth  -  C  -  Logo 

-  Fortran  -  Cobol  -  Basic 

-  Pascal  -  Assembler 

Neben  guten  Programmierkenntnissen  ist  ein 
sicherer  Schreibstil  wünschenswert 
Sollten  Sie  an  einer  freiberuflichen  Tätigkeit  in¬ 
teressiert  sein,  setzen  Sie  sich  direkt  mit  unserem 
Verlag  in  Verbindung. 

DMV  Verlag,  z.H.  Herrn  Ritter, 
Fuldaer  Str.  6,  3440  Eschwege 


Universeller  EPROM-Programmer  4003 
für  Schneider  CPC  464  /  664  /  6128 

■  Programmiert  alle  gängigen  EPROM-Typen  (  z  B  :  2716,-32, 
-64,-128,2508,-16,-32,-64.  )  •  Voll  menügesteuerte  Soft¬ 
ware  auf  Kassette  oder  Diskette  ■  Kein  Schallen,  Stecken 
oder  Löten  nötig  <  Programmierspannung  wird  im  Gerat 
erzeugt  ■  Verbindung  zum  CPC  über  Flachbandkabel  und 
Inlarrace-Karle  ■  Gleichzeitiger  Anschluß  der  Floppy 
möglich  ■  Rote  und  grüne  Lauchtdiod«  zur  Betriebs-Art- 
Anzaiga  ■  Komptill  mit  28  poligam  Taitool-Sockel  ■ 

■  Ferliggerät  464/664  DU  289,50  ■  Fertiggerit  6128  0M  319,50  • 
Baustil  mit  Anleitung  für  464/664  DM  239,-  ■  Bausilz  mit  Anleitung 
für  6128  DM  269,-  ■  Software  auf  3’  Diskette  ♦  DM  15,-  /  auf  5  25*  Diskette  *  DM  5,-> 

EPROM-Karte  2-64  KByte  für  alle  CPC 

*  Wahlweise  bestückbar  mit  2-64  KByte  EPROM-Kapazi- 
tät  ■  Arbeitet  mit  den  EPROM-Typan  2716,-32,-64,-128 

■  Durchgeführter  Erwailerungsbus  (  Ftoppy  kompatibel  ) 

*  Autoslift  aon  BASIC-  und/oder  Assembltr-Program- 
men  ■  Komplett  mit  umfangreicher  und  komfortabler 
Software  auf  Kassette  oder  Diskette  ■  Gleichermaßen 
für  Profis  und  Einsteiger  geeignet  ■ 

■  Fertiggerit  für  464/664  DM  249,50  •  Fertiggerit  füi 
6128  DM  259,50  ■  Bausalz  mit  Anleitung  für  464/664 
DM  219,50  ■  Bausalz  mit  Anteilung  Tür  6128  DM  229,50 

■  Softwira  auf  3'  Diskette  *  DM  15,-  ■  Software  auf  5.25'  Diskette  +  DM  5,-  ■ 


speedy  100-60  der  Drucker  für  alle  CPC 


■  100  Zeichen  pro  Sakunde  schneit  ■  FX80  kompatibel 

■  Bis  zu  142  Zeichen  pro  Zeilt  ■  Optionaler  Drucker- 
puffar  ■  Grafikflhig  ■  Kein  doppelter  Zeilenaorsehub 

■  Direkt  anschlußfihig  ■  Internationale  Zeiehensätza 
■  Friklionsw8lze  und  Traklorantrieb  serienmäßig  ■  Ein- 
gebautär  Selbsttest  ■  Bidirektional  Druckweg  optimiert 

■  Optimales  Preis-Leistungsaerhältnis  * 

■  Komplett  mit  deutschem  und  engl  Handbuch  DM  739,-  ■ 
■  Zusätzlicher  Druckerpuffar  :  2K  DM  25,-  ■  4K  DM  50,-  ■ 


Druckerkabel 

■  Soflwareangebot  auf  Anfrage 


für  CPC  464/664  DM  3S,-  für  CPC  6128  DM  39,- 


DOBBERTin 

IflDU/TRIE -ELEHTROfllK 

Alle  Artikel  ab  Lager  lieferbar.  Brahmsatraßa  9,  6835  Brühl,  Tel:  (06202)  71417 
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,3270 

3060  ’ 

[117] 

2200 

RETURN 

[555  J 

3070  xl =MIN(xa,xb) :x2=MAX(xa,xb) 

[2600  1 

2210 

[1171 

3080  yl =MAX(ya,yb) :y2=MIN(ya,yb) 

[2827] 

2220 

•  *  *  *  PLOT  *  *  * 

[7861 

3090  ORIGIN  0,0, xl ,x2,y1 ry2:CLG 

[1094  ] 

2230 

(1171 

3100  ORIGIN  0 ,0,0,639,399,0:RETURN 

[1  422  ] 

2240 

PLOT  xa,ya: RETURN 

[1618] 

3110  ' 

[117] 

2250 

1 

[117] 

3120  '***  PCLS  *** 

[698] 

2260 

*  *  *  *  DRAW  *  *  * 

[1284  1 

3130  ' 

[117] 

2270 

1 

[117] 

3140  GOSUB  1480: 1 PCLS, num: RETURN 

[1281  1 

2280 

MOVE  xbryb:DRAW  xa,ya 

117641 

3150  ' 

[117] 

2290 

xb=xa : yb=ya: RETURN 

[1  376  1 

3160  '***  INVERT  *** 

[7861 

2300 

1 

[117  1 

3170  ' 

[117] 

2310 

•  *  *  *  REC  *  *  » 

[9741 

3180  GOSUB  1480:  jINV, num :RETURN 

[1277  1 

2320 

1 

[1171 

3190  ' 

[117] 

2330 

MOVE  xb,yb:DRAW  xb,ya 

[1723] 

3200  '*•*  COPY  *** 

[1157] 

2340 

DRAW  xa,ya:DRAW  xa,yb 

[1387] 

3210  ’ 

[117] 

2350 

DRAW  xb,yb: RETURN 

1653] 

3220  x=xa:y=ya:xa=xb:ya=yb 

[1053] 

2360 

1 

[117] 

3230  GOSUB  1 480 : | KEEP, num 

[1  312] 

2370 

' *  *  *  BOX  *  *  * 

[759] 

3240  xa=x: ya=*y :GOSUB  1480 

[21 58  ] 

2380 

1 

1117] 

3250  ! SHOW, num: RETURN 

[1786] 

2390 

FOR  y=yb  TO  ya  STEP  SGN(ya-yb)*2 

[1372  ] 

3260  ' 

[1171 

2400 

MOVE  xb,y:DRAW  xa,y:NEXT 

[1305] 

3270  '***  PRINT  *** 

[1131  1 

2410 

RETURN 

[555] 

3280  ' 

[1173 

2420 

1 

[117] 

3290  TAG: MOVE  xa,ya: PRINT  k; 

11603  1 

2430 

' *  *  *  CUBE  *  *  * 

[836] 

3300  TAGOFF: RETURN 

11224] 

2440 

• 

[117] 

3310  ' 

1117] 

2450 

rflag=rflag  XOR  1 

[15131 

3320  '***  ZOOM  **• 

11301  1 

2460 

OM  rf lag  GOTO  2590 

[751  ] 

3330  * 

[117] 

2470 

x=xc-xb :  y  =sy  c-yb 

[1238] 

3340  GOSUB  1 480 :} KEEP , num 

[13121 

2480 

IF  x<0  THEN  xl =MIN(xa,xb) :x2=MAX(xa,x 

[34931 

3350  x=INT( (xa-m*80)/sz)+1 

[16571 

b) ELSE  xl =MAX(xa,xb) :x2=MIN(xa,xb) 

3360  y=INT( ( 399-ya-n*50 )/2 )+1 

[15941 

2490 

IF  y<0  THEN  yl  =MAX(ya,yb) :y2=MIN(ya,y 

(43381 

3370  | PAGE , 1 : MODE  md : 1  ZOOM 

[21 11  1 

b) ELSE  yl =MIN(ya,yb) :y2=MAX(ya,yb) 

3380  PEN  pn: PRINT  CHR$(7); 

[1020  1 

2500 

GOSUB  2330 

[857] 

3390  EVERY  15  GOSUB  3520 

[1  359  1 

2510 

MOVE  xl ,y1 

£432] 

3400  i=INKEY$ : IF  i=""GOTO  3400 

[1220] 

2520 

DRAWR  x,y 

[197] 

3410  m=REMAIN ( 0 ) : ON  vflag  GOSUB  3520 

[12661 

2530 

DRAWR  0,y2-YPOS+y 

[738] 

3420  IF  i=CHR$ ( 1 3 )GOTO  3470 

[10831 

2540 

DRAWR-x, -y 

[780] 

3430  m=INSTR( LEFT$ (cmd( 2 ) , 6 ) , i ) 

[1651  1 

2550 

DRAWR  x,y 

[197] 

3440  ON  m  GOSUB  3550,3560,3570,3580,3600,3 

[25381 

2560 

DRAWR  x2-XPOS+x, 0 

[5361 

620 

2570 

DRAWR-x, -y 

[7801 

2580 

RETURN 

[555] 

3450  GOSUB  3520:GOTO  3390 

[1077  ] 

2590 

xc=xa : yc=ya : RETURN 

[2108] 

3460  : 

[174  1 

2600 

• 

[117] 

3470  PRINT  CHR$ ( 7 ) ; 

[11751 

2610 

' *  *  *  CIRCLE  • • • 

(9081 

3480  i=INKEY$ : IF  i=""GOTO  3480 

[1141  1 

2620 

' 

[1171 

3490  IF  i <  >CHR$ (13) GOTO  3390 

[1  4091 

2630 

rx=ABS ( xa-xb ) : ry =ABS ( ya-yb ) 

[909] 

3500  IREDUCE: ! PAGE, 0: ! SHOW, num 

[16191 

2640 

FOR  1=0  TO  366  STEP  360/SQR{ rx *ry+1 ) 

[1333] 

3510  PEN  1: RETURN 

[1269] 

2650 

x=xb+rx*SIN{ 1 ) :y=yb+ry *COS( 1) 

[1861  ] 

3520  LOCATE  x,y:CALL  &BB8A 

[898  ] 

2660 

IF  1 >0  THEN  DRAW  x,y  ELSE  PLOT  x,y 

[3170] 

3530  vf lag=vf lag  XOR  1 ; RETURN 

1599] 

2670 

NEXT: RETURN 

[940] 

3540  : 

[174] 

2680 

1 

[1171 

3550  y=MAX( y — 1 ,1 ) : RETURN 

[1681  1 

2690 

' *  *  *  SPOT  • *  * 

[640] 

3560  y=MIN(y+1 ,25): RETURN 

[18531 

2700 

' 

[117] 

3570  x=MAX(x-1 ,1 ) : RETURN 

[29221 

2710 

rx=ABS ( xa-xb ) : ry=ABS ( ya-yb ) 

[9091 

3580  xwin=-1 9  * (md=0 ) -39  * (md=1 )-79‘<md  =  2) 

[2886 1 

2720 

FOR  1=0  TO  180  STEP  90/(ry+1) 

[14291 

3590  x=MIN (x,xw in ) +1 : RETURN 

[2164  ] 

2730 

x=rx *SIN < 1 ) : y=yb+ry *COS ( 1 ) 

[4372] 

3600  LOCATE  x,y: PRINT  CHR$(143); 

[1087  1 

2740 

MOVE  xb-x,y: DRAWR  2*x,0 

[1094  ] 

3610  RETURN 

[5551 

2750 

NEXT: RETURN 

[940] 

3620  LOCATE  x,y: PRINT  CHR$(32); 

(11561 

2760 

1 

[117] 

3630  RETURN 

[555] 

2770 

LARGE  *  *  * 

11121  1 

3640  * 

[1171 

2780 

1 

1117] 

3650  *  **•  SWAP  *** 

1755  1 

2790 

x= (xb-xa ) \8 :y= (ya-yb ) \8 

[1071  ] 

3660  ' 

11171 

2800 

FOR  n=1  TO  LEN(k) 

[6041 

3670  GOSUB  1 480 :! KEEP , num : nm=num 

[23131 

2810 

l=mtx+ASC(MID$(k,n) )*8 

11314] 

3680  x=xa:y=ya:xa=xb:ya=yb:xb=x:yb=y 

[1215] 

2820 

FOR  ma=0  TO  7 

[808] 

3690  GOSUB  1  480 :  J-SWAP , num:  1  SHOW, nm 

11890] 

2830 

b=BIN$ (PEEK( 1+ma ) , 8 ) 

[22031 

3700  RETURN 

[555] 

2840 

FOR  mb=1  TO  8 

[846] 

3710  ' 

(1171 

2850 

IF  MID$(b,mb,1  )="1 "THEN  GOSUB  2880 

[2481  ] 

3720  ' ***  MOVE  *** 

[1219] 

2860 

NEXT  mb, ma,n: RETURN 

[1494  1 

3730  ' 

[117] 

2870 

; 

[1741 

3740  xb=xa: yb=ya: RETURN 

[1376  ] 

2880 

xc=xa+x*( (n-1 ) *8+mb-1 ) 

[2350  ] 

3750  * 

[117] 

2890 

yc=ya-y *ma 

[859] 

3760  '•••  FIND  *** 

[1095  1 

2900 

FOR  yd=yc  TO  yc-y  STEP  2*SGN(-y) 

[2393  ] 

3770  * 

(1171 

2910 

MOVE  xc, yd: DRAWR  x,0 

[1039] 

3780  GOSUB  1480 

[819  ] 

2920 

NEXT: RETURN 

[940] 

3790  x=m*80 :y=399-n*50 

11025] 

2930 

• 

[117] 

3800  PRINT  CHR$ (23 ) CHR$ ( 1  ) ; 

[19193 

2940 

’***  FILL 

[1254] 

3810  GOSUB  3820: CALL  &BB06 

[1754  1 

2950 

• 

[117] 

3820  MOVE  x , y : DRAWR  0,-49 

[944  ] 

2960 

MOVE  xa,ya: ! FILL :RETURN 

[2346] 

3830  DRAWR  79,0:DRAWR  0,49 

[1021  1 

2970 

' 

[1171 

3840  DRAWR -7 9,0: RETURN 

[7591 

2980 

•  * • *  SPRAY  *  *  * 

[517] 

3850  ' 

1117] 

2990 

• 

[117] 

3860  '*•*  ERASE  «*• 

[767  ] 

3000 

x=xa-xb:y=ya-yb 

[1654  ] 

3870  ' 

[117] 

3010 

FOR  n=0  TO  ABS(x*y)/250/sz 

[1685] 

3880  PRINT  CHR$ ( 23 ) CHR$ ( 0 ) ; 

[19231 

3020 

PLOT  xb+x*RND,yb+y *RND 

[2169] 

3890  POKE  &96A5,&C4: !GPEN,0 

[20721 

3030 

NEXT: RETURN 

[940] 

3900  GOSUB  21 90: jGPEN,pn 

(1  503) 

3040 

' 

[1171 

3910  POKE  &9'6A5,8CC: RETURN 

(1393  1 

3050 

' *  *  *  CLG  • *  * 

[769] 

3920  ' 

[1171 

116 
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3930  ' •••  HELP  •**  [692 ] 

3940  '  [ 1 1 7  J 

3950  RESTORE  4050  [924] 

3960  FOR  y=2  TO  22  STEP  2  [12741 

3970  FOR  x=2  TO  26  STEP  13  [956] 

3980  READ  a ,  b : LOC ATE  x,y  [1587] 

3990  PRINT  CHR$  (  24  )RIGHT$  (  " . . " +a, 3 )  CHR$  (24  [3018] 
)"  -  "b; 

4000  NEXT  x ,  y : LOCATE  7,24  [850] 

4010  ITH  ILE  INKEY$  <  >""  :  WEND  [1786] 

4020  PRINT"Press  any  key  to  continue  [2050] 

4030  CALL  &BB06 : RETURN  [1826] 

4040  :  [1741 

4050  DATA  G , PLOT, Z , ZOOM , COP , SETUP  [I486] 

4060  DATA  D , DR AW , CLR , CLG , ENT , MOVE  [1180] 

4070  DATA  R,REC,0,PCLS , TAB, FIND  [1601  ] 

4080  DATA  Y , BOX , X , INVERT , W , WRITE  [1702) 

4090  DATA  A , CUBE , N , SWAP , DEL , ERASE  [2238) 

4100  DATA  C, CIRCLE, H,COPY,M, MODE  [1535) 

4110  DATA  E, SPOT, P, PEN, ent, EXIT  [1767] 

4120  DATA  Q, LARGE, I, INK, S, SAVE  12543] 

4130  DATA  F , FILL , B , BORDER , L , LOAD  [1027] 

4140  DATA  J , SPRAY , V , SYMBOL , U , MERGE  [1622] 

4150  DATA  T, TEXT, K, STEP, SPC, HELP  [1139] 

4160  '  [117] 

41 70  ' ***  PEN  »*•  [61  6 ) 

4180  '  [117] 

4190  PRINT"Pen: "pn  [879] 

4200  LOCATE  2 , 4 : INPUT"Pen" ; pn  [2223] 

4210  IF  pn<0  OR  pn>pz  GOTO  4200  [12  201 

4220  |GPEN,pn: RETURN  [1184] 

4230  1  [117] 

4240  ' •**  INK  ***  [321  ] 

4250  '  [1171 

4260  PRINT" Ink  Table  [8641 

4270  FOR  p=0  TO  pz:LOCATE  3,4+p  [15111 

4280  IF  pn=p  THEN  PRINT  CHR$ ( 24 ) ; :xf lag*1  C2211) 
4290  PRINT  USING "##  -"+STR$ ( vi (p)) ;p  [1473  ] 

4300  IF  xf lag  THEN  PRINT  CHR$ ( 24 ) : xf lag=0  [2329] 
4310  NEXT :GOSUB  1520  [9741 

4320  LOCATE  2 , 22 : INPUT" Ink  [Nr, fl  ";n,m  [2686] 

4330  IF  n<0  OR  m<0  OR  n>pz  OR  m>26  GOTO  43  [2540] 
20 

4340  vi<n)=m:INK  n , in: RETURN  [2501  ] 

4350  '  [1171 

4360  '***  BORDER  ***  [974] 

4370  '  1117] 

4380  PRINT"Border : "vb:GOSUB  1520  [2835] 

4390  LOCATE  2 , 4 : INPUT"Border" ; vb  [27051 

4400  IF  vb<0  OR  vb>26  GOTO  4390  (2186) 

4410  BORDER  vb: RETURN  [1189] 

4420  '  [117] 

4430  '***  TEXT  ***  [6101 

4440  '  [117] 

4450  PRINT"Text:  ";:GOSUB  1710:k=""  [2509] 

4460  GOSUB  1790:IF  m=7  THEN  z=15:RETURN  [2162] 


4470  IF  m=5  THEN  k=k+CHR$ ( p ): PRINT  CHR$(1)  [3836] 
CHR$ ( p } ; :GOTO  4460 


PRINT  CHR$ ( 8 ) "  "CHR$ ( 8 ) ; 

4490  GOTO  4460 

[317] 

4500 

1 

[117] 

4510 

' *  *  *  SYMBOL  *  *  * 

[563] 

4520 

I 

[117] 

4530 

LOCATE  14,3 

[674  ] 

4540 

PRINT  CHR$ ( 24 ) "  Zeichensatz  MCHR$(24) 

[2950  ] 

4550 

GOSUB  1710 

[869] 

4560 

GOSUB  1 790 : IF  m>5  GOTO  4560 

[21631 

4570 

• 

[174] 

4580 

MODE  1 : LOCATE  2 , 2 

11337] 

4590 

PRINT  CHR$(1 )CHR$(p}"  Code:"p 

[2620] 

4600 

WINDOW# 1 ,2,9,4,12 

[1257] 

4610 

PEN#1 ,1 : PAPER# 1 , 2 :CLS#1 

[916] 

4620 

LINE  INPUT# 1 ,a 

[14531 

4630 

a=LEFT$ (a+STRING$ { 64 , "0" ) , 64 ) 

[2695 ] 

4640 

l=mtx+p*8:FOR  n=0  TO  7 

[8331 

4650 

POKE  l+n,VAL("&x"+MID$ (a,n*8+1 ,8) ) 

(1431  1 

4660 

NEXT: RETURN 

[9401 

4670 

' 

[117] 

4680 

<  **•  gTEP  *** 

[91  4  ) 

4690 

' 

[117] 

4700 

PRINT"X-Step: "stx 

(970) 

4710 

PRINT"  Y-Step: "sty 

[1290] 

4720 

LOCATE  2,5: INPUT"X-Step  ";stx 

[2556] 

4730 

IF  stx  < 1  OR  stx  >80  GOTO  4720 

[8831 

4740 

LOCATE  2,7:INPUT"Y-Step  "jsty 

(1176) 

4750 

IF  sty<1  OR  sty >80  GOTO  4740 

[2293 ) 

4760 

RETURN 

(5551 

4770 

1 

[117] 

4780  '***  WRITE  *”  [947] 

4790  '  11173 

4800  RESTORE  4880  [7591 

4810  FOR  n=0  TO  3 :READ  a  [916] 

4820  LOCATE  2,2+n*2  [870] 

4830  IF  n=wr  THEN  PRINT  CHR$(24)n"-  "a"  "C  [3377] 

HR$ ( 24 ) ELSE  PRINT  n"-  "a 

4840  NEXT  [350] 

4850  LOCATE  2,12:INPUT  wr  [2265] 

4860  IF  wr <0  OR  wr>3  GOTO  4850  [1981] 

4870  RETURN  [555] 

4880  DATA  NORMAL , XOR , AND, OR  Mode  [1201] 

4890  '  1117] 

4900  '**•  MODE  ***  [1  442  ] 

4910  ’  [1171 

4920  PRINT"Mode: "md  [18201 

4930  LOCATE  2 , 4 :INPUTuMode  ";md  [32231 

4940  IF  md <0  OR  md>2  GOTO  4930  [379  ] 

4950  xa=32Q:ya=200:xb=xa:yb=ya  [2874] 

4960  sz=2A(2rtnd):pz=2Asz-1  11587) 

4970  | PAGE , 0 : RETURN  [1332] 

4980  *  [117] 

4990  ' ***  SAVE  ***  [588] 

5000  '  [117] 

5010  INPUT"Name  des  Bildes  ";b  [1951] 

5020  IF  LEN ( b) <1  OR  LEN(b)>8  GOTO  5010  [2110] 

5030  PRINT, CHR$ ( 24 ) ; 1 ;CHR$ (24);  [1664] 

5040  PRINT"  Gesamtbild"  [1658] 

5050  PRINT, CHR${ 24 ) ; 2 ;CHR${ 24 ) ;  [2243] 

5060  PRINT"  Teilbild": PRINT  1995) 

5070  i=INKEY$:IF  i<"1"OR  i>"2"GOTO  5070  [1918] 

5080  MODE  md : i PAGE , 0  [10311 

5090  ON  VAL ( i ) GOSUB  5110,5150  [1746] 

5100  j PAGE , 1 : RETURN  [1458] 

5110  POKE  65518, md:POKE  65519, vb  [1307] 

5120  FOR  n=0  TO  15  [577] 

5130  POKE  65520 +n,vi(n) :NEXT  [1130) 

5140  SAVE" 1 "+b+".gsb" ,b,491 52, 1 6384:RETURN  [2130] 
5150  GOSUB  1 480 :s=n:r=m:p=1 6384  12009) 

5160  xa=xb : ya =yb : GOSUB  1480  [1561] 

5170  nv=MIN ( n,s ) : nb=MAX{n, s )  [1902] 

5180  mv=MIN(m,r ) :mb=MAX(m, r )  [453] 

5190  FOR  y=nv  TO  nb  [1044  ] 

5200  FOR  x=mv  TO  mb  [1198] 

5210  JKEEP,y*8+x: CALL  &9505,p  [19641 

5220  p=p+250 :NEXT  x,y  [18753 

5230  POKE  16380, nv:POKE  16381, nb  [1610] 

5240  POKE  1 6382 ,mv: POKE  16383, mb  11573) 

5250  SAVE" 1 "+b+" . tlb" ,b, 16380, p- 16380 :RETU  [3282] 
RN 

5260  '  l1171 

5270  '***  LOAD  *•*  [1291] 

5280  '  [117] 

5290  INPUT"Name  des  Gesamtbildes  ";b  [1890] 

5300  IF  LEN ( b ) < 1  OR  LEN(b)>8  GOTO  5290  [2118] 

5310  LOAD  b+".gsb" ,&C000  [1482] 

5320  md=PEEK(  6551  8  ) :  sz=*2  A  ( 2-md>  :pz=2Asz-1  [2569] 
5330  vb=PEEK{ 6551 9 ) : BORDER  vb  [2378] 

5340  FOR  n=0  TO  1 5 : vi {n ) =PEEK[ 65520+n)  [2285] 

5350  INK  n,vi(n) : NEXT: RETURN  [3266] 

5360  1  tl  1  7  1 

5370  '***  MERGE  •**  [1249] 

5380  ’  11171 

5390  INPUT"Name  des  Teilbildes  ";b  [2264] 

5400  IF  LEN(b) <1  OR  LEN(b) >8  GOTO.  5390  [2298] 

5410  J PAGE, 0:p=1 6384: LOAD" !"+b+". tlb",  1638  [2388] 
0 

5420  FOR  y=PEEK{ 1 6380 )TO  PEEK( 16381)  [2060] 

5430  FOR  x=PEEK( 16382 )TO  PEEK(16383)  [2323] 

5440  CALL  &950A,p: !SHOW,y *8+x  [1425] 

5450  p=p+250 :NEXT  x,y: ! PAGE, 1 : RETURN  [2924] 

5460  '  t1 1  7  1 

5470  ' ***  EXIT  **•  £566 ] 

5480  '  t1171 

5490  | PAGE, 1: MODE  1 : LOCATE  2,2  [1948] 

5500  PRINT"Beenden  ?  ";:CALL  &BB8A  [2229] 

5510  i=INKEY$ : IF  i=""GOTO  5510  [1159] 

5520  CALL  &BB8D : LOCATE  2,4  [13011 

5530  IF  i <CHR$ ( &FF )GOTO  1220  [2140] 

5540  PRINT"Continue:  'GOTO  1200'  [2470] 

5550  PRINT: END  [738] 

5560  '  [1 1  7  ] 

5570  ON  ERROR  ***  [707] 

5580  '  [117] 

5590  | PAGE , 1 : MODE  1 : LOCATE  2,2  [1948] 

5600  PRINT"Error"ERR"in  Line"ERL  [2980] 

5610  LOCATE  2,4:GOSUB  4010  [2262] 

5620  GOTO  1220  [359] 
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für  CPC  464  -  664  -  6128 


Sie  haben  noch  keine  Disk  Station? 
Dann  steigen  Sie  doch  gleich  rich¬ 
tig  ein! 

Die  Kraftwerke: 

vortex  Floppy  Disk  Station  Fl  und 
Ml 

708  KiloByte  oder  1.4  MegaByte  auf  Stan¬ 
dard  5,25"  oder  3,5"  Disketten  -  damit  ha¬ 
ben  Ihre  Programme  genügend  „Auslauf". 


M 1  -  D  3,5"  Doppelstation 


Fantastische  Leistungsdaten: 

5,25"  oder  3,5"  Qualitätslaufwerke  mit  2 
Schreib-/Leseköpfen  und  insgesamt  160 
Spuren. 

Die  Geräte  F 1  -  S  (5,25",  708  KB)  und  M 1  -  S 
(3,5",  708  KB)  können  einfachst  durch  Ein¬ 
bau  eines  weiteren  Laufwerks  zu  den  Ge¬ 
räten  F 1  -  D  (5,25",  1.4  MB)  und  M 1  -  D  (3,5", 
1.4  MB)  erweitert  werden. 

Pro  Diskette  können  bis  zu  128  Dateien  an¬ 
gelegt  werden. 

Es  kann  zusätzlich  ein  original  Schneider 
3"  Laufwerk  angeschlossen  werden.  Da¬ 
mit  können  Sie  nach  Belieben  zwischen  3" 
und  5,25"/3,5"  kopieren. 

Es  ist  auch  ein  „gemischtes  Doppel"  erhält¬ 
lich:  vortex  FM  1:  ein  5,25"  Laufwerk  und  ein 
3,5"  Laufwerk: 


FM  1  5,2573,5"  Doppelstation 


Der  Tophit  für  jeden  CPC 
(464  +  DDI-l,  664, 6128): 

1  Megabyte  =  758  DM 

Damit  präsentieren  wir  eine  professionel¬ 
le  Systemlösung  für  alle  die,  die  schon  ein 
3"  Laufwerk  haben,  aber  den  Standard 
brauchen  (Fl-X  =  5,25"  bzw.  Ml-X  = 
3,5"). 

Unsere  Formel  lautet: 

180  KB  (3")  +  708  KB  (X-System)  =  888  KB. 


Zwei  professionelle  Betriebssyste¬ 
me: 

•  CP/M  2.2  und  CP/M  plus  (nur  CPC  6128) 

•  Unter  BASIC:  VDOS  2.1  -  das  vortexDisk 
Operating  System.  Es  ist  das  Beste . . . 

•  Relative  Dateiverwaltung,  es  können  bis 
zu  16  Dateien  gleichzeitig  bearbeitet 
werden, 

•  Z80  Maschinensprache  Monitor. 

•  Disketteneditor. 

•  Automatische  Formaterkennung  (Sy¬ 
stem/Data  Format)  bei  angeschlosse¬ 
nem  3"  Laufwerk. 

•  Disketten  formatieren  unter  BASIC. 


Intelligente  Floppycontroller  Elek¬ 
tronik 

•  Background  ROM  Nummer  frei  einstell¬ 
bar.  Damit  wird  sichergestellt,  daß  sich 
zwei  Peripheriegeräte  nicht  „stören“. 

•  Ausführliches  deutsches  Handbuch. 


Und  damit  Sie  nicht  länger  überlegen 
müssen: 


vortex  Floppy  F 1  -  S 
bzw.  Ml-S 

vortex  Floppy  F 1  -  D 
bzw.  Ml-D 


dm  998** 

DM  1498-* 


Alle  Geräte  sind  sofort  anschlußfertig. 


*  unverbindliche  Preisempfehlung 


Das  3,5"  X-Laufwerk 


Das  X(RS)-Modul  erweitert  den  3"  Con¬ 
troller  um  die  Leistungsdaten  unseres 
VDOS  2.0  Betriebssystems. 


Trickfoto:  X-Modul  (RS-Ausführung)  und  3"  Schneider  Con¬ 
troller 


•  Das  X-Laufwerk  ist  kein  Zweitlaufwerk, 
sondern  Ihr  Systemlaufwerk. 

•  Die  Befehle  "ICPM,1”  und  ”ICPM,2"  er¬ 
möglichen  es  erstmals,  CP/M  von  bei¬ 
den  Drives  gleichberechtigt  zu  starten. 

•  Ihr  3"  Laufwerk  und  das  X-Drive  unter¬ 
scheiden  sich  zwar  wesentlich  in  Daten¬ 
dichte  und  Datenformat  das  Kopieren 
geschieht  jedoch  so  reibungslos  und 
glatt,  als  gäbe  es  diesen  Unterschied 
nicht. 

•  Sie  wählen  per  Kommando  zwischen 
"AMSDOS”  und  "VDOS  2.0"  als  Betriebs¬ 
system  -  Sie  verfügen  über  beides  - 
nach  Ihrer  Wahl. 

•  Als  herausragende  Leistung  bietet  Ih¬ 
nen  VDOS  2.0: 

- 128  Directory  Einträge 
-  direkter  relativer  Dateizugriff  unter 


Wenn  Sie  keinen  Händler  in  der  Nähe  haben, 
rufen  Sie  doch  einfach  an! 


L 


LVL 


1 


Das  5,25"  X-Laufwerk 


BASIC.  16  Dateien  können  gleichzeitig  ge¬ 
öffnet  sein. 

-  ROM  residenter  Monitor  +  Diskeditor. 

-  mit  ”1  Format"  formatieren  Sie  direkt  unter 
BASIC. 

-  mit  ”1  Code,«var»"  realisieren  Sie  einen 
Programmschutz  mit  persönlichem  Pass¬ 
wort. 

-  direkte  Parametereingabe  bei  RSX- 
Befehlen. 


X-Modul  in  Standardausführung  (Abb.  ohne  Gehäuse) 

•  RS  232  wird  benötigt?  Dann  wählen  Sie 
die  Fl-XRS  oder  Ml-XRS. 

Ein  kompaktes  RS  232  Modul  ist  bei  die¬ 
sem  Typ  integriert 

Als  Softwarekomponenten  stehen  Ihnen 

zur  Verfügung: 

•  RSX-Kommandos  zur  Programmierung 
der  seriellen  Schnittstelle  unter  BASIC 
und  ein  Terminalprogramm  für  MO¬ 
DEM  Betrieb. 

•  Schnittstelle  unter  CP/M  (2.2  und  3.0) 
und  BASIC  frei  programmierbar. 

•  X-Modul  nachträglich  zum  XRS-Modul 
aufrüstbar. 

•  ROM-Nummer  frei  einstellbar. 


Vergleichen  Sie  und  sagen  Sie  uns: 
Wer  kann  mehr! 


Ml-X  (3,5") 
Fl-X  (5,25") 


Ml-XRS  (3,5") 
Fl-XRS  (5,25") 


Die  vortex  Hard  Disk  WD  20 . . . 

...für  alle  Profianwender  oder  solche,  die 
es  werden  wollen! 

Schnelles  Disk  Subsystem  hoher  Spei¬ 
cherkapazität. 


Das  WD  20  Subsystem 


•  5,25"  Hard  Disk  (20  MB  formatiert) 

•  5,25"  Floppy  Disk  (708  KB  formatiert) 

•  Kombinierter  Hard/Floppy  Disk  Con¬ 
troller  (kann  maximal  zwei  Hard  Disks 
ä  64  MB  und  vier  Floppies  verwalten). 
Datenübertragungsrate  Hard  Disk:  5 
MBit/sec. 


Hard/Roppy  Disk  Controller 


•  Einsatz  unter  BASIC  (VDOS2.1),  CP/M 
2.2  und  CP/M  plus  (nur  6128  und  Joyce). 
Hard  Disk  maximal  in  vier  logische  Lauf¬ 
werke  aufteilbar.  Jedes  dieser  Laufwer¬ 
ke  kann  Bootlaufwerk  sein. 

•  Umfangreiche  Betriebssoftware,  wie 
z.B.  Formatter,  Backuputilities  etc.,  wer¬ 
den  mitgeliefert. 

•  Einfache  Datensicherung  über  einge¬ 
bautes  5,25"  Floppy  Disk  Laufwerk  und 
Backupsoftware.  (Sowohl  physikali¬ 
sches,  als  auch  fileorientiertes  Backup) 

•  ÄUe  VDOS  Features  stehen  zur  Verfü¬ 
gung:  z.B.  relative  Dateien,  schnelle  Büd- 
schirmausgabe,  Maschmensprachmo- 
nitor/Diskeditor  etc. 

•  Weitere  Laufwerke  extern  anschließ¬ 
bar,  z.B.  auch  das  originale  3"  Laufwerk 

Wo  sonst  bekommen  Sie 

6  KB  pro  Kubik-  OAQQ  •k 

Zentimeter  für  DM  wÄA)j“ 

Subsystem  AAAQ  ^ 

ohne  Floppy  DM  Ä/vöj“ 

Falls  Sie  bereits  unsere  Fl-S/D  haben, 
sprechen  Sie  einfach  mal  mit  uns,  wir  rü¬ 
sten  auch  günstig  um! 


Die  Speichererweiterung 
Wenn  Sie... 

...professionelle  Programme  wie  dBase, 
Wordstar  und  Multiplan  voll  nutzen  wollen 
...bis  zu  288KByte  lange  Basic-Program- 
me  schreiben  wollen  (nur  CPC  464) 
...unter  CP/M 2.2  in  den  Genuß  einer  ex¬ 
trem  schnellen  RAM-Floppy  von  bis  zu 
448  KByte  Kapazität  mit  128  Directory  Ein¬ 
trägen  kommen  wollen 
. . .  auf  den  32  KByte  großen  Drucker-Spoo¬ 
ler  unter  CP/M  und  BASIC  (nur  464)  nicht 
mehr  verzichten  können 
...einen  sofort  verfügbaren  Maschinen- 
sprach-Monitor  und  eine  verschnellerte 
Büdschirmausgabe  benötigen 
. . .  daun  braucht  Ihr  CPC  464  die  vortex- 
Speichererweitenmg. 


SP  512  Speichererweiterung 


•  Kompromißloses  CP/M  2,2  mit  60  KByte 
TPA. 

•  Das  auf  der  Speichererweiterung  inte¬ 
grierte  BOS  (Basic  Operating  System/ 
nur  464)  erlaubt  es  Ihnen: 

-  288  KB  lange  Basic-Programnie  zu 
schreiben. 

-  17  komplette  Büdschirminhalte  Zwi¬ 
schenspeichern  und  die  abgeleg¬ 
ten  Bilder  mit  einer  Bildwechselrate  von 
3  Bildern  pro  Sekunde  wieder  sichtbar 
zu  machen 

-  eine  relative  Datei  im  Speicher  der  Er¬ 
weiterung  anzulegen,  die  dann  extrem 
schnellen  Datenzugriff  ermöglicht 

•  Eingebauter  Maschinensprach-Moni- 
tor:  Disassembler,  Tracer,  Dumper  etc. 

...und  das  alles  zum  sensationel¬ 
len  Preis  von 

Speichererweiterung  /*rfeO  £ 
SP  256  DMZw,“ 

Speichererweiterung  £ 

SP  512  DM  OSlOp“ 

vortex  Computersysteme  ■  Vertriebs  GmbH 

Falterstraße  51  -  53  •  7101  Flein 

Tel.  0  71 31  / 5  20  61  -  63  •  Telex  7  28  91 5  tron  d 
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Das 

Software- 

Experiment 

Folge  2: 
Das  Spiel  des  Lebens 

Leistungsfähige,  grafisch  orientierte 
Computersysteme  gewinnen  in  der  In¬ 
dustrie,  Wissenschaft  und  Kunst  zu¬ 
nehmend  an  Bedeutung.  Die  Entwick¬ 
lung  und  Darstellung  hochkomplexer 
Strukturen  ist  in  vielen  Fällen  über¬ 
haupt  erst  durch  den  Einsatz  bildverar¬ 
beitender  Systeme  möglich  geworden. 
Und  erstaunlich  genug  -  oft  liefern 
selbst  rein  zweckorientierte  For¬ 
schungsprojekte  ein  Bildmaterial,  das 
man  eher  einem  genialen  Künstler 
Zutrauen  möchte.  Die  in  der  letzten 
Folge  behandelten  ”Chaos-Grafiken” 
stellen  sicherlich  eines  der  erstaunlich¬ 
sten  Beispiele  in  dieser  Hinsicht  dar. 

Doch  bei  aller  Begeisterung  für  die 
Möglichkeiten  der  neuen  Techno¬ 
logie  sollte  man  nicht  vergessen,  daß 
sich  in  der  Natur  zahlreiche  "Kreatio¬ 
nen”  finden  lassen,  neben  denen  die 
meisten  Computergrafiken  noch 
recht  blaß  aussehen.  Haben  Sie 
schon  einmal  Schneekristalle  durch 
eine  Lupe  oder  ein  Mikroskop  be¬ 
trachtet  ?  Falls  nicht,  so  sollten  Sie  es 
bei  nächster  Gelegenheit  nachholen, 
oder  zumindest  lesen,  was  der  Schrift¬ 
steller  Thomas  Mann  über  dieses  Er¬ 
lebnis  berichtet: 

"Kleinodien,  Ordenssterne,  Brillant¬ 
garaffen,  wie  der  getreueste  Juwe¬ 
lier  sie  nicht  reicher  und  minuziöser 
hätte  hersteilen  können...,  und  unter 
den  Myriaden  von  Zauberstemchen 
in  ihrer  untersichtigen,  dem  Men¬ 
schenauge  nicht  zugedachten,  heim¬ 
lichen  Kleinpracht  war  nicht  eines 
dem  anderen  gleich  ” 

Der  unerschöpfliche  Erfindungsgeist, 
mit  dem  die  Natur  milliardenfache 
Variationen  des  Themas  "sechsstrah- 
lige  Symmetrie”  erzeugt,  erscheint 
nach  wie  vor  als  ein  unbegreifliches 
Wunder  -  und  doch  ist  es  inzwischen 
mit  Hilfe  intelligent  ausgedachter 
Computersimulationen  gelungen,  zu¬ 
mindest  einige  der  Grundprinzipien 
dieser  Naturvorgänge  zu  erforschen 


und  zu  verstehen.  So  konnte  unter  an¬ 
derem  gezeigt  werden,  daß  ein  einfa¬ 
cher  Satz  geeigneter  Regeln  (Naturge¬ 
setze).  wiederholt  angewendet  auf  be¬ 
stimmte  Grundelemente  (Moleküle), 
mit  fast  zwingender  Notwendigkeit 
Strukturen  beliebiger  Komplexität 
erzeugt. 

Aufgrund  dieser  Erkenntnisse  spre¬ 
chen  manche  Forscher  von  einer 
"Selbstorganisationsfähigkeit  der 
Materie”,  eine  Theorie,  die  zu  weitrei¬ 
chenden  Konsequenzen  führt.  Wie  ist 
zum  Beispiel  das  Leben  auf  unserem 
Planeten  entstanden  -  ein  einmaliger 
Zufall?  Wenn  die  Materie  unter  der 
Einwirkung  der  Naturgesetze  die' Fä¬ 
higkeit  erlangt,  sich  selbst  zu 


strukturieren,  so  ist  vielleicht  die  indi¬ 
viduelle  Ausprägung  der  Lebensfor¬ 
men  zufallsbedingt,  nicht  aber  die 
Tatsache  des  organischen  Lebens  an 
sich  -  es  mußte  mit  hoher  Wahrschein¬ 
lichkeit  entstehen,  sobald  die  ent¬ 
sprechenden  Rahmenbedingungen  ge¬ 
geben  waren! 


Am  Anfang  war  der  Punkt... 


Wie  aus  einfachsten  Voraussetzun¬ 
gen  außerordentlich  komplexe  Muster 
entstehen  können,  soll  nun  ein  klei¬ 
nes  Software-Experiment  auf  dem 
CPC  demonstrieren,  ein  wahres  Ka- 
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binettstück  der  mathematischen  Ex¬ 
perimentalkunst.  Eine  derart  kunst¬ 
volle  Filigrangrafik,  wie  sie  das  Pro¬ 
gramm  "Reproduktionsmuster"  er¬ 
zeugt,  haben  Sie  wahrscheinlich  auf 
Ihrem  Bildschirm  noch  nicht  gese¬ 
hen! 

Das  Programm  operiert  mit  den  denk¬ 
bareinfachsten  Grundelementen,  näm¬ 
lich  mit  Bildpunkten,  die  entweder 
gesetzt  (hell)  oder  zurückgesetzt 
(dunkel)  sind.  Dazu  kommen  noch 
zwei  "Naturgesetze",  die  iterativ  (wie¬ 
derholt)  auf  den  gesamten  Bildschirm 
angewendet  werden: 

-  Setze  simultan  alle  Punkte,  in  deren 
Nachbarschaft  (links,  rechts,  oben 


und  unten)  sich  genau  ein  heller 
Punkt  befindet. 

Alle  Punkte,  die  auf  diese  Weise  bei 
einem  Durchgang  neu  entstehen, 
werden  als  eine  "Generation"  be¬ 
zeichnet.  Mit  Hilfe  dieser  Definition 
kann  nun  die  zweite  Regel  formuliert 
werden: 

-  Nachdem  die  Generation  (n)  er¬ 
zeugt  wurde,  lösche  alle  Punkte  der 
Generation  (n-2). 

Die  Punkte  gehen  also  nach  einiger 
Zeit  an  "Altersschwäche"  zugrunde; 
nach  jedem  Durchgang  sind  exakt 
die  jeweils  letzten  zwei  Generationen 
auf  dem  Bildschirm  zu  sehen. 
Solange  die  Regeln  auf  einen  leeren 
Bildschirm  angewendet  werden,  pas¬ 
siert  natürlich  überhaupt  nichts  - 
doch  ein  einziger  Punkt,  der  in  Zeile 
410  des  Programms  als  Kristallisa¬ 
tionskeim  gesetzt  wird,  bringt  die  La¬ 
wine  ins  Rollen.  Bild  1  verdeutlicht 
das  Prinzip  und  zeigt  die  Entwick¬ 
lung  der  ersten  fünf  Generationen. 
Das  durch  CALL  &A000  aufgerufene 
Maschinenprogramm  führt  die  Re¬ 
geln  aus  und  sorgt  für  die  Bildschirm¬ 
darstellung.  Übrigens  wurden  bei  der 
Programmierung  konsequent  die  in 
der  Serie  "Der  gläserne  CPC”  (Heft  3 
u.  4/86)  dargestellten  Techniken  zur 
Erzeugung  schneller  Grafik  benutzt. 
Die  normalen  Systemroutinen  oder 
ein  Basicprogramm  wären  hoffnungs¬ 
los  zu  langsam,  da  pro  Generation  bis 
zu  384  000  mal  Punkte  auf  ihre  Farbe 
getestet  werden  müssen! 

Die  Darstellung  der  Generationen 
durch  verschiedene  Farben  hat  aber 
nicht  nur  ästhetische  Gründe.  Sie  er¬ 
möglicht  es  dem  Programm,  die  Ge¬ 
neration  (n-2)  zu  erkennen,  ohne  eine 
Unmenge  von  Koordinaten  abzuspei¬ 
chern.  Weiterhin  erlaubt  die  Farb- 
darstellung  die  quasi-synchrone  An¬ 
wendung  der  Gesetze:  Die  während 
der  Erzeugung  einer  Generation  (n) 
bereits  gesetzten  Punkte  werden  noch 


nicht  als  Nachbarn  gezählt.  Natür¬ 
lich  kann  der  Computer  nicht  wie  ge¬ 
fordert  alle  Bildpunkte  gleichzeitig 
erfassen,  sondern  nur  nacheinander 
behandeln  -  eine  Tatsache,  die  durch 
geeignete  Programmiertricks  aus¬ 
geglichen  werden  muß,  um  Störun¬ 
gen  zu  vermeiden. 

Wer  noch  gerne  etwas  mit  diesem  Sy¬ 
stem  experimentieren  möchte,  kann 
einmal  eine  veränderte  Anfangssi¬ 
tuation  ausprobieren.  Der  in  Zeile 
410  erzeugte  Punkt  kann  z.B.  durch 
einen  Buchstaben  oder  ein  Gra¬ 
fiksymbol  ersetzt  werden.  Sehr 
reizvoll  sind  auch  Bilder,  die  aus 
mehreren  auf  dem  Bildschirm  verteil¬ 
ten  Keimen  entstehen.  Obwohl  die  ty¬ 
pische  Charakteristik  der  erzeugten 
Grafiken  erhalten  bleibt,  ergibt  sich 
je  nach  Startfigur  ein  anderer  Ablauf 
-  und  die  Analogie  zur  Entstehung 
von  Schneekristallen  wird  deutlich: 
Die  Ausprägung  der  Form  wird 
durch  den  Kristallkeim  bestimmt 
(z.B.  ein  Staubkorn),  die  charakteri¬ 
stische  Symmetrie  jedoch  durch  die 
Gesetzmäßigkeiten  der  molekularen 
Bindungskräfte. 


Der  Zellautomat 


Bevor  wir  uns  einem  weiteren,  auf 
ähnlichen  Grundlagen  beruhenden 
Software-Experiment  zuwenden,  soll 
zunächst  daran  erinnert  werden,  auf 
welche  Weise  eigentlich  der  CPC 
Informationen  verarbeitet. 

Wie  Sie  sicherlich  wissen,  enthält  Ihr 
Computer  einen  Mikroprozessor  als 
zentrale  Steuerungseinheit.  Er  liest 
binäre  Werte  aus  den  Speicherzellen, 
verknüpft  sie  in  seinen  internen  Regi¬ 
stern  nach  bestimmten  Regeln,  und 
legt  das  Ergebnis  wieder  in  anderen 
Speicherzellen  ab. 

Diese  Art  der  Informationsverarbei¬ 
tung  nennt  man  sequentiell:  Kom- 
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plizierte  Berechnungen  werden  aus¬ 
geführt,  indem  die  dazu  notwendigen 
Schritte  nacheinander  Stück  für  Stück 
programmgesteuert  abgearbeitet  wer¬ 
den.  Nach  diesem  Prinzip  funktio¬ 
nieren  praktisch  alle  Digitalcompu¬ 
ter,  und  nur  die  hohe  Verarbeitungs¬ 
geschwindigkeit  erzeugt  mitunter  den 
Eindruck,  der  Rechner  könne  meh¬ 
rere  Dinge  gleichzeitig  erledigen. 

Der  Computer  ist  damit  ein  getreues 
Abbild  des  sprachorientierten  mensch¬ 
lichen  Verstandes.  Auch  die  verbale 
Informationsverarbeitung  kann  nur 
sequentiell  erfolgen.  Versuchen  Sie 
einmal,  bewußt  zwei  verschiedene 
Gedanken  gleichzeitig  zu  denken  - 
Sie  werden  sehen,  es  ist  praktisch 
unmöglich. 

Allerdings  stellt  der  Verstand  auch 
nur  einen  sehr  kleinen  Teilausschnitt 
des  informatischen  Systems  "Mensch” 
dar.  Schon  die  verschiedenen  For¬ 
men  der  Sinneswahrnehmung  erfor¬ 
dern  ein  Verarbeitungssystem,  das 
nach  einem  ganz  anderen  Prinzip  ar¬ 
beitet.  Es  ist  ja  ohne  weiteres  möglich, 
mehrere  Dinge  gleichzeitig  zu  sehen 
oder  zu  fühlen  -  mit  anderen  Worten, 
der  Mensch  kann  eine  große  Anzahl 
verschiedener  Daten  parallel  erfas¬ 
sen. 

Der  Verstand  ist  zwar  in  der  Lage,  die 
von  den  Sinnesorganen  gelieferten 
Informationen  auf  einer  abstrakten 
Ebene  zu  analysieren,  doch  für  die 


unmittelbare  Auswertung  ist  er  ef¬ 
fektiv  zu  langsam.  Stellen  Sie  sich 
doch  einmal  vor.  Sie  müßten,  um  ein 
Haus  zu  erkennen,  das  Bild  bewußt  in 
ein  Punktraster  zerlegen,  jedem 
Punkt  einen  Färb-  und  einen  Hel¬ 
ligkeitswert  zuordnen,  die  Daten 
dann  mit  einem  bereits  gespeicherten 
Raster  vergleichen  und  daraus  einen 
Wert  ermitteln,  der  Ihnen  verrät,  mit 
welcher  Wahrscheinlichkeit  es  sich 
um  ein  Haus  handelt...  des  langen 
Satzes  kurzer  Sinn:  Sie  wären  prak¬ 
tisch  handlungsunfähig! 

Dieses  Beispiel  macht  deutlich, 
warum  selbst  die  besten  und  schnell¬ 
sten  Computer  trotz  aller  Bemühun¬ 
gen  der  Forscher  nicht  in  der  Lage 
sind,  im  menschlichen  Sinne  zu  se¬ 
hen  oder  zu  hören:  Ihr  Arbeitsprinzip 
ist  dazu  einfach  ungeeignet.  Zwar 
werden  inzwischen  schon  Versuche 
mit  Multiprozessor- Systemen  unter¬ 
nommen,  doch  auch  hierbei  ergeben 
sich  erhebliche  praktische  Schwie¬ 
rigkeiten.  So  kann  man  z.B.  nicht  er¬ 
warten,  daß  ein  Rechner  mit  100  Pro¬ 
zessoren  100  mal  so  schnell  wie  ein 
normaler  Computer  läuft,  da  ein 
großer  Teil  der  Kapazität  gebraucht 
wird,  um  den  Datentransfer  zwischen 
den  verschiedenen  Einheiten  zu  ko¬ 
ordinieren. 

Interessanterweise  existiert  jedoch 
ein  Ansatz  zur  Lösung  dieser  Pro¬ 
bleme,  der  bereits  in  der  Vor- 


Computerzeit  von  dem  Mathemati¬ 
ker  John  v.  Neumann  theoretisch 
untersucht  wurde.  Die  schon  1936 
von  Alan  M.  Turing  aufgeworfene 
Frage  nach  der  möglichen  Existenz 
einer  universellen  Denkmaschine  ver- 
anlaßte  ihn  zur  gedanklichen  Kon¬ 
struktion  eines  sogenannten  "Zell- 
automaten”. 

Dabei  handelt  es  sich  um  einen 
homogenen,  zellulär  unterteilten 
Raum,  in  dem  jede  Zelle  eine  be¬ 
stimmte  Anzahl  von  Zuständen  an¬ 
nehmen  kann  {z.B.  verschiedene  Far¬ 
ben).  Auf  alle  Zellen  wird  synchron 
ein  Satz  von  Umwandlungsregeln 
(Transition  Rules)  angewendet,  de¬ 
ren  Ausführung  im  einzelnen  von 
dem  Zustand  der  jeweiligen  Zelle  und 
der  angrenzenden  Nachbarzellen  ab¬ 
hängt.  John  v.  Neumann  konnte  theo¬ 
retisch  nachweisen,  daß  eine  Konfi¬ 
guration  aus  200.000  Zellen  mit  je¬ 
weils  vier  definierten  Nachbarn  und 
29  Zustandsmöglichkeiten  ausreicht, 
um  im  Prinzip  jede  denkbare  Rechen¬ 
operation  auszuführen. 

Solch  ein  Zellautomat  enthält  also 
keinen  zentralen  Prozessor,  sondern 
die  Speicherzellen  kommunizieren 
ohne  Umschweife  direkt  miteinan¬ 
der.  Mit  jedem  Taktimpuls,  der  im  ge¬ 
samten  Raum  eine  Umwandlung  laut 
Regelkatalog  bewirkt,  werden  eine 
große  Anzahl  von  Operationen  gleich¬ 
zeitig  ausgeführt.  Informationen  er¬ 
scheinen  dabei  nicht  mehr  als  Bits 
und  Bytes,  sondern  als  Raum-  oder 
Flächenmuster,  die  sich  überlagern 
und  gegenseitig  beeinflussen  können 
-  ein  Prinzip,  das  die  Natur  auch  bei 
der  Konstruktion  des  menschlichen 
Gehirns  angewendet  hat. 


Das  Spiel  des  Lebens 


Die  wohl  bekannteste  Veranschauli¬ 
chung  des  Zellautomaten-Prinzips 
ist  das  1970  vom  britischen  Mathe¬ 
matiker  Conway  erfundene  "Game  of 
Life".  Wie  in  unserem  vorherigen  Ex¬ 
periment  kann  in  diesem  Spiel  jede 
Zelle  zwei  verschiedene  Zustände  an¬ 
nehmen;  sie  ist  also  entweder  "be¬ 
wohnt"  oder  "unbewohnt”.  Aller¬ 
dings  wurde  die  Nachbarschaft  auch 
auf  die  diagonal  angrenzenden  Zel¬ 
len  erweitert  -  jede  Zelle  hat  also  acht 
Nachbarzellen  -  und  die  Umwand¬ 
lungsregeln  wurden  so  formuliert, 
daß  die  Abläufe  recht  realistisch  die 
Folgen  von  Isolation,  Überbevölke¬ 
rung  oder  Kooperation  in  einer  Ge¬ 
sellschaft  lebendiger  Wesen  darstel¬ 
len.  Sie  lassen  sich  durch  zwei  einfa¬ 
che  Kommandos  erfassen: 
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Bild  2:  Einige  GAME  OF  LIFE-Konfiguraiionen 


-  Besetze  synchron  alle  leeren  Zellen, 
die  genau  drei  Nachbarn  haben. 

-  Lösche  gleichzeitig  (!)  alle  Zellen, 
die  weniger  als  zwei  oder  mehr  als 
drei  Nachbarn  haben. 

Eine  weitere  Darstellungsmöglichkeit 
für  diese  Gesetze  ist  ein  computerge¬ 
recht  gestalteter  Regelkatalog  in  Ta¬ 
bellenform.  Er  gibt  die  Belegung 
einer  Zelle  in  der  Generation  (n+1) 
in  Abhängigkeit  von  ihrem  momen¬ 
tanen  Zustand  und  der  Anzahl  der 
Nachbarn  an.  Eine  1  bedeutet,  daß 
die  Zelle  in  der  nächsten  Generation 
bewohnt  sein  wird,  eine  0  steht  dage¬ 
gen  für  eine  leere  Zelle: 

Anzahl  der  Nachbarn 
012345678 
Zellen-  0  000100000 
zustand  1  0  0  1  1  0  0  0  0  0 

Auf  den  ersten  Blick  scheinen  die  Le¬ 
bensbedingungen  der  Life-Einzeller 
also  ziemlich  schlecht  zu  sein  -  sie 
reagieren  sehr  empfindlich  auf  Ein¬ 
samkeit  oder  Überbevölkerung.  Einige 
Versuche  zeigen  jedoch  recht  schnell. 


daß  gerade  diese  Einschränkungen 
dem  System  seine  Dynamik  verlei¬ 
hen  und  zu  hochinteressanten  Ab¬ 
läufen  führen.  Nicht  umsonst  hat  die¬ 
ses  Spiel  nach  seiner  Entstehung  an 
LJniversitäten  und  wissenschaftli¬ 
chen  Instituten  für  allerhand  Aufse¬ 
hen  und  mitu  nter  sogar  Ärger  gesorgt, 
da  die  Terminals  der  Rechenanlagen 
regelmäßig  von  Life-Fanatikern 
blockiert  wurden  -  für  jedermann 
verfügbare  Heimcomputer  gab  es  ja 
in  den  siebziger  Jahren  noch  nicht. 
Doch  die  Zeiten  haben  sich  glück¬ 
licherweise  geändert,  und  Sie  können 
mit  Hilfe  des  Programms  "GAME 
OF  LIFE"  stundenlang  auf  Ihrem 
CPC  experimentieren,  ohne  befürch¬ 
ten  zu  müssen,  daß  Sie  im  nächsten 
Moment  das  Betriebssystem  wegen 
Überschreitung  der  Rechenzeit  aus 
dem  Rechner  wirft. 

In  dem  Programm  werden  die  Zellen 
nicht  wie  bei  den  Reproduktionsmu¬ 
stern  pixelweise,  sondern  etwas  ver¬ 
größert  dargestellt;  insgesamt  steht 
eine  Fläche  mit  50*80  =  4000  Zellen 
zur  Verfügung.  Die  Umwandlungsre¬ 
geln  führt  w'ieder  ein  kleines  Maschi¬ 


nenprogramm  aus,  es  schafft  etwa 
zwei  Generationen  pro  Sekunde.  Be¬ 
sonderer  Wert  wurde  auf  eine  extrem 
schnelle  Bildschirmausgabe  gelegt  - 
in  der  Tat  scheinen  die  Umwandlun¬ 
gen  auf  der  gesamten  Fläche  gleich¬ 
zeitig  zu  erfolgen. 

Nach  dem  Programmstart  erscheint 
zunächst  das  leere  Spielfeld,  das  mit 
einem  Karomuster  vorstrukturiert  ist, 
um  eine  genaue  Analyse  der  einzel¬ 
nen  Abläufe  zu  ermöglichen.  Um 
sich  einen  Eindruck  von  dem  Treiben 
der  Life-Einzeller  zu  verschaffen, 
können  Sie  zunächst  die  Taste  <Z> 
drücken,  worauf  der  Rechner  eine 
Zufallsverteilung  auf  dem  Bildschirm 
produziert.  Warten  Sie  eine  Weile,  bis 
die  Fläche  einigermaßen  voll  ist,  und 
brechen  Sie  dann  den  Vorgang  mit 
<ENTER>  ab.  Mit  Hilfe  der 
<SPACE>-Taste  können  Sie  nun 
die  jeweils  nächste  Generation  erzeu¬ 
gen,  oder  auch  mit  <A>  die  Genera¬ 
tionswechsel  automatisch  ablaufen 
lassen.  Auch  diese  Funktion  wird  mit 
<ENTER>  abgebrochen. 

Um  gezielt  die  Eigenschaften  be¬ 
stimmter  Konfigurationen  zu  unter¬ 
suchen,  kann  mit  <E>  ein  kleiner 
Editor  angewählt  werden.  Der  Cursor 
wird  wie  üblich  mit  den  Pfeiltasten 
gesteuert;  die  Taste  <1>  belegt  die 
Zelle  auf  Cursorposition,  die  Taste 
<0>  löscht  sie  entsprechend.  Um 
ganze  Reihen  von  von  Life-Wesen  zu 
produzieren,  können  Sie  auch  die  Ta¬ 
ste  <1>  gedrückt  halten  und  den 
Cursor  über  den  Bildschirm  wandern 
lassen,  er  hinterläßt  dann  eine  Spur 
von  gefüllten  Zellen.  Mit  <ENTER> 
wird  Edit-Modus  wieder  verlassen 
und  mit  <L>  bei  Bedarf  die  gesamte 
Fläche  gelöscht. 

Bild  2  zeigt  einige  typische  Life- 
Konfigurationen.  Die  mit  l  bezifferte 
Gruppe  enthält  vier  stabile  Figuren, 
die  bei  den  Generationswechseln 
unverändert  bleiben.  Gruppe  2  zeigt 
drei  sogenannte  "Gleiter”.  Bei  diesen 


Ein  toller  Computer,  dieser  Joyce! 

Für  unsere  ständige 

Joyce-Rubrik  suchen  wir  noch 

zur  Veröffentlichung. 
Honorar  nach  Vereinbarung. 


Einsendungen  an:  DMV  Daten  &  Medien  Verlagsges.  mbH.  Fuldaer  Str.  6,  3440  Eschwege 
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Figuren  handelt  es  sich  um  Oszillato¬ 
ren,  die  periodisch  ihre  alte  Form  wie¬ 
dererlangen,  sich  dabei  aber  um  ein 
kleines  Stück  weiterbewegen.  Statio¬ 
näre  Oszillatoren  mit  einer  Periode 
von  2  bis  15  Generationen  finden  Sie 
dagegen  in  der  Gruppe  4  versammelt. 
Ein  besonders  eigenartiges  Verhalten 
zeigt  der  30-Generationen-Oszillator, 
der  die  Gruppierung  5  bildet:  Er  pro¬ 
duziert,  ohne  dabei  an  Substanz  zu 
verlieren,  eine  Serie  kleiner  Gleiter, 
die  nach  rechts  abwandern. 

Die  Gruppe  3  enthält  noch  zwei  Figu¬ 
ren,  die  ein  expansives  Verhalten  zei¬ 
gen.  Während  die  obere  Figur  jedoch 
schon  nach  wenigen  Generationen  in 
vier  stationäre  Oszillatoren  zerfällt, 
ist  die  untere  Figur  ohne  weiteres  in 
der  Lage,  den  gesamten  Bildschirm 
mit  ihren  Nachkommen  zu  füllen.  Sie 
gilt  als  die  kleinste  Figur,  die  sich  be¬ 
liebig  weit  ausdehnt;  bisher  konnte 
noch  kein  definierter  Endzustand  er¬ 
mittelt  werden. 

Wenn  Sie  die  abgebildeten  Muster 
alle  gemeinsam  testen  wollen,  entfer¬ 
nen  Sie  am  besten  zunächst  diese  ex¬ 
pansive  Figur  und  die  drei  Gleiter  aus 
dem  Sortiment,  um  die  anderen  Figu¬ 
ren  nicht  zu  stören.  Ansonsten  ist  es 
aber  sehr  interessant,  was  sich  bei 
einer  Kollision  verschiedener  Muster 
abspielt:  Sowohl  eine  totale  Auslö¬ 
schung  als  auch  die  Entstehung 
neuer  Figuren  kann  die  Folge  sein. 
Durch  die  eifrigen  Bemühungen  der 
vielen  Life-Forscheristes  inzwischen 
sogar  gelungen,  Muster  zu  finden,  die 
durch  gegenseitige  Beeinflussung  logi¬ 
sche  Funktionen  wie  etwa  NOT, 
AND,  OR  oder  XOR  simulieren  -  ein 
wichtiger  Schritt  in  Richtung  eines 
praktisch  anwendbaren  Zellautoma¬ 
ten. 

Ein  Problem,  das  die  Realisierung 
eines  auch  nur  kleinen  Zellrechners 
auf  dem  CPC  verhindert,  ist  leider  die 
unvermeidliche  Spielfeldbegrenzung 
-  selbst  eine  320*200- Fläche  wäre 
noch  viel  zu  klein.  Das  Programm  be¬ 
trachtet  alle  Zellen  außerhalb  der 
Fläche  als  leer,  und  daraus  ergeben 
sich  empfindliche  Störungen,  sobald 
ein  Muster  an  den  Rand  stößt.  Auf 
interessante  Weise  arrangiert  sich  al¬ 
lerdings  der  Gleiter  oben  rechts  mit 
dieser  Beschränkung:  Er  wird 
reflektiert  und  verwandelt  sich  dabei 
in  einen  kleineren  Gleiter! 

Wie  Sie  bei  eigenen  Experimenten 
feststellen  können,  führt  die  Begren¬ 
zung  des  Lebensraumes  dazu,  daß 
alle  Konfigurationen  nach  einiger 
Zeit  steckenbleiben;  es  bleiben  nur 
noch  stabile  Muster  und  Oszillatoren 
übrig,  die  keine  grundsätzlich  neuen 
Entwicklungen  mehr  bewirken  kön- 
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nen.  Doch  dieses  Phänomen  hat 
noch  eine  andere  Ursache:  Im  Game 
of  Life  ist  der  "schöpferische  Zufall” 
nicht  vorgesehen.  Der  gesamte 
Prozeß  läuft  deterministisch  ab,  d.h. 
mit  einer  gegebenen  Anfangssi¬ 
tuation  steht  praktisch  schon  in  allen 
Einzelheiten  fest,  was  passieren  wird. 
Sie  können  aber  einmal  erforschen, 
was  die  folgenden  zusätzlichen 
Programm zeilen  bewirken: 

981  f=l 

982  re=INT(RND*50)-f  1 

982  sp=INT(RND*80)+l 

983  GOSUB  1060 

Wenn  Sie  jetzt  den  automatischen 
Generationswechsel  mit  <A>  an¬ 
wählen,  wird  bei  jedem  Durchgang 
ein  neues  Wesen  an  einem  zufälligen 
Ort  geboren  und  bringt  etwas  Ab¬ 
wechslung  in  die  Angelegenheit  -  wie 
bereits  in  der  vorigen  Folge  angedeu¬ 
tet,  spielt  der  Zufall  bei  der  Erzeu¬ 
gung  dynamischer  ("lebendiger”) 
Strukturen  ja  eine  wichtige  Rolle. 
Und  es  gibt  noch  eine  weitere  sehr 
interessante  Experimentiermöglich- 
keit:  In  den  DATA-Zeilen  530  und 
540  steht  der  vorhin  bereits  erwähnte 
Regelkatalog  für  das  Game  of  Life. 
Hier  können  Sie  natürlich  die  Nullen 
und  Einsen  auch  anders  verteilen 
und  damit  neue  Umivandlungsge- 
setze  gestalten.  Die  Abläufe,  die  sich 
aus  einem  veränderten  Regelkatalog 
ergeben,  stellen  ein  recht  unerforsch¬ 
tes  Gebiet  dar  und  bieten  noch  viel 
Raum  für  aufregende  Entdeckungen. 


Evolution  im  Computer? 


Nach  dieser  schon  recht  eindrucks¬ 
vollen  Simulation  eines  Zellautoma¬ 
ten  drängt  sich  die  Frage  auf:  Wieso 
ist  eigentlich  eine  solche  Maschine 
noch  nicht  gebaut  worden?  An  der 
Hardware  dürfte  es  nicht  scheitern, 
die  nötigen  Chips  wären  mit  dem 
heutigen  technischen  Stand  sicher¬ 
lich  realisierbar.  Doch  das  Problem 
liegt  ganz  woanders:  Kein  Mensch 
weiß,  wie  man  einen  Zellautomatcn 
programmieren  könnte. 

Wie  bereits  erörtert  wurde,  beruht 
jede  Sprache  -  und  damit  auch  jede 
Programmiersprache  -  auf  einer  se¬ 
quentiellen  Logik.  Zwar  können  wir 
auch  über  Ereignisse  sprechen,  die 
simultan  stattfinden,  jedoch  nur, 
indem  wir  sie  nacheinander  beschrei¬ 
ben.  Deshalb  ist  es  sehr  zweifelhaft, 
ob  ein  leistungsfähiger  Zellautomat, 
der  hunderte  und  tausende  von  Ope¬ 
rationen  gleichzeitig  durchführt  und 
dabei  unzählige  sich  kreuz  und  quer 
gegenseitig  beeinflussende  Muster 


bildet,  jemals  mit  den  Mitteln  eines 
sequentiell  arbeitenden  Verstandes 
beherrscht  werden  kann.  Bisher  ist 
nur  ein  einziger  Ausweg  aus  diesem 
Dilemma  sichtbar:  Die  Maschine  muß 
sich  selbst  programmieren! 

Wenn  Sie  Ihren  CPC  programmieren, 
so  formulieren  Sie  mit  Hilfe  einer  Pro¬ 
grammiersprache  einen  Algorithmus, 
der  Schritt  für  Schritt  angibt,  wie  aus 
einer  Situation  A  das  Resultat  B  er¬ 
zeugtwird.  Wie  einfach  wäre  es  doch, 
wenn  Sie  den  Computer  einschalten 
und  zu  ihm  sprechen  könnten:  „Hier, 
mein  elektronischer  Freund,  das  ist 
ein  Schachbrett,  das  sind  die  Figuren, 
lind  so  gehen  die  Regeln...  und  du 
hast  gewonnen,  wenn  du  meinen 
König  eroberst,  bevor  ich  deinen  er¬ 
wische.  Spiele  so,  daß  du  nach 
Möglichkeit  gewinnst!" 

Sehen  Sie  -  genau  das  müßte  der  Zell¬ 
automat  können:  selbständig  Lö¬ 
sungswege  finden.  Wie  bereits  gezeigt 
wurde,  stellt  es  kein  Problem  dar,  sich 
selbst  organisierende  Systeme  zu  er¬ 
schaffen  -  doch  mit  ein  paar  Umwand¬ 
lungsregeln,  die  irgendwelche  Mu¬ 
ster  erzeugen,  ist  es  in  diesem  Fall 
nicht  getan.  Um  gut  Schach  zu  spie¬ 
len,  müßte  die  Maschine  zielgerichtet 
problembezogene  Strukturen  produ¬ 
zieren,  ungünstige  Muster  verwerfen, 
Erfahrungen  sammeln  und  selektiv 
auswerten...  mit  anderen  Worten, 
einen  Lernvorgang,  eine  Evolution 
nachvollziehen. 

Doch  die  Formulierung  von  Bewer¬ 
tungsschemata,  die  einen  sich  selbst 
organisierenden  Prozeß  zielgerichtet 
ablaufen  lassen,  ist  bisher  ein  theore¬ 
tisch  nur  ansatzweise  gelöstes  Pro¬ 
blem.  Interessante  Hinweise  liefert 
allerdings  ein  Forschungsbereich, 
der  sich  mit  dem  Grenzgebiet  zwi¬ 
schen  Biologie  und  Informatik  be¬ 
schäftigt:  Welche  Strategien  hat  die 
Natur  bei  der  Entwicklung  des  Le¬ 
bens  angewendet?  Welche  mathema¬ 
tisch-statistischen  Gesetzmäßigkei¬ 
ten  tragen  dazu  bei,  daß  sich  be¬ 
stimmte  Arten  entfalten,  w'ährend 
andere  aussterben? 

Die  nächste  Folge  des  Software- 
Experiments  wird  noch  etwas  Ma¬ 
terial  zu  diesem  Thema  liefern.  Wer 
sich  intensiver  mit  diesem  Gebiet  be¬ 
schäftigen  möchte,  dem  sei  das  Buch 
"Das  Spiel  -  Naturgesetze  steuern 
den  Zufall”  von  Manfred  Eigen/ 
Ruthild  Winkler  (Piper  Verlag)  emp¬ 
fohlen.  Es  werden  eine  ganze  Reihe 
weiterer  Simulationsspiele  vorge¬ 
stellt,  die  sich  auch  auf  einem  Heim¬ 
computer  realisieren  lassen  -  eine 
gute  Grundlage  für  alle  Computer- 
Forscher  und  solche,  die  es  werden 
wollen!  (M.  Uphoff) 
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10 

‘  *  *  Reproduktionsmuster  ******* 

(2045  ] 

20 

1117] 

30  MEMORY  &9FFF 

[134] 

40  FOR  adr=&AQ00  TO  &A0AB 

[872  ] 

50  READ  a$ :v=VAL( "&"+a$ ) 

[870] 

60  ! 

s=s+v: 

POKE  adr, v 

[12581 

70  NEXT  adr 

[547] 

80  : 

IF  S<: 

>19012  THEN  PRINT"DATAFEHLER  1": 

EN 

(35721 

90 

• 

1117] 

100 

DATA 

EF,03,AO,21 ,A9,A0,E5,DD 

[948] 

110 

DATA 

El ,7E,23,46,23,4E,77,2B 

[1223] 

120 

DATA 

71 , 2B, 70 , 1 6 , 88 , 21 ,00, C0 

[1  455] 

130 

DATA 

0E,C8,06,50,E5,7E,A2,20 

[9651 

140 

DATA 

4D,5F,7E,CB,02,30,08,3E 

[1  574  ] 

150 

DATA 

50,B8,28 ,06 ,2B,7E,23,CD 

[1029] 

160 

DATA 

A0 , A0 , CB , 0A, 7E, CB, OA, 30 

(1  593  ] 

170 

DATA 

08 , 3E, 01 , B8 , 28 , 06 , 23 , 7E 

[1220  ) 

180 

DATA 

2B,CD,A0,A0,CB,02,3E,C8 

[1  487  1 

190 

DATA 

B9 , 28 , 09 ,E5 ,CD, 2D, 0C, 7E 

[18251 

200 

DATA 

El , CD, A0 , A0 , 3E, 01  ,B9,28 

[907] 

210 

DATA 

09 ,E5,CD,1 3,0C,7E,E1  ,CD 

[866  ) 

220 

DATA 

A0 , AQ , 3E ,01 , BB, 20 , 07 , 3A 

[924] 

230 

DATA 

A9 , AO , AE, A2 , AE, 77 , CB, 0A 

[1856  } 

240 

DATA 

30 , AB , 23, 10, A8, El , CD, 1 3 

[807] 

250 

DATA 

0C , 0D, 20 , 9E, 3 A, AA , A0 , 5F 

11174) 

260 

DATA 

21  , 00 ,C0 , 0E, C8 , 06 , 50 , E5 

£2209) 

270 

DATA 

7E,AB,A2,20,04, AE , A2 , AE 

[2061  ] 

280 

DATA 

77 ,CB, 0A, 30,F3,23,10,F0 

(14963 

290 

DATA 

El , CD, 1 3 , 0C, 0D, 20 , E6 ,C9 

£846) 

300 

DATA 

A2 , C8 ,DD, AE, 00,A2,C8,1C 

[1859] 

310 

DATA 

C9,0F,F0,FF 

[91  1  ] 

320 

[117] 

330 

REM  Pokes  fuer  CPC  664 

[967] 

340 

'POKE  &A04D, &35 : POKE  &A05B , &1 B: POKE 

&A 

£36651 

077 , &1 B: POKE  &A09A,&1B 

350  '  [117] 

360  REM  Pokes  fuer  CPC  6128  [1071  J 

370  'POKE  &A04D, &39.-POKE  &A05B , &1 F: POKE  &A  14409] 

077, &1F: POKE  &A09A ,  &1  F 

380  '  {117  1 

390  MODE  1 : BORDE R  0  [1436] 

400  INK  0,0:INK  1,6:INK  2,15:INK  3,2  [796] 

410  PLOT  320,200,2  [619] 

420  WHILE  INKEY$=""  [1095] 

430  CALL  &A000  [637] 

440  WEND  [390] 


10  '*****.•**•  GAME  OF  LIFE  ********* 

20  ' 

30  * ****••**••  Basiclader  fuer  M-Code 


40  MEMORY  &7FFF 

50  FOR  adr=&8000  TO  &B097 

60  READ  a$:v=VAL( "&"+a$ ) 

70  s=s+v:POKE  adr,v 
80  NEXT  adr 

90  IF  s< >16737  THEN  PRINT"DATAFEHLER  !":EN 
D 

100  * 

110  DATA  DD, 21 ,EA, 80, 11  ,92,91  ,26 
120  DATA  A2, 0E, 32, 06, 50, DD, 23, 13 
130  DATA  DD , 7E, AD, DD, 86 , AE, DD , 86 
140  DATA  AF, DD, 86, FF, DD, 86, 01  , DD 
150  DATA  86,51 , DD, 86, 52, DD, 86, 53 
160  DATA  DD, CB, 00, 46,28,02,06,09 
170  DATA  6F,6E, 7D, DD, AE, 00 , QF,B5 
180  DATA  12, DD, 23, 13, 10, D2, DD, 23 
190  DATA  13,0D,20,C7,21 ,92,91  ,11 
200  DATA  EA, 80, 01 ,04, 10, ED, B0, 21 
210  DATA  00 ,E0 ,E5 , 26 ,C0 , 1 1 ,EA,80 
220  DATA  0E, 32, 06, 50, 13, 1A, CB, 7F 
230  DATA  28,1 5, E6, 01 ,12,D5,E5,11 
240  DATA  OO,O8,3E,0E,28,O2,3E,E0 
250  DATA  77, 19, 77, 19, 77, El , Dl ,23 
260  DATA  13,10,E2,E3,13, OD, 20 , DA 
270  DATA  El ,C9 , 3E, 80 ,CD, 8B, 80 ,CD 
280  DATA  4F, 80 , AF, 21 ,98, 80, 54, 5D 
290  DATA  13,01 ,4F,21 ,77, ED, B0, C9 
300  ' 

310  '***•••*»•*  initialsierung 
320  MODE  1 


12426] 

1117] 

[2932 1 

[1501 

[865] 

[870] 

[1258] 

[547] 

[1704  ] 

[117] 

[1426] 

[1133] 

[1755] 

[537] 

[1  413  1 

[1258] 

[1391  1 

[947  ] 

[1167] 

[1072  ] 

[726  J 

[1468] 

[588] 

[7331 

[1460] 

[1339] 

12068] 

[10191 

[1109] 

[117] 

[1671  ] 

[506  ] 


330  DEFINT  a-z 

340  INK  0 . 0; INK  1,13:INK  2,3:INK  3,24 

350  BORDER  0 
360  PLOT  -2, -2, 3 

370  SYMBOL  250 , &F8 , &88 , &88 , &88 , &F8 , 0 , 0 , 0 
380  cu$=CHR$ ( 250 ) 

390  xon$=CHR$ ( 23 )+CHR$ ( 1 ) 

400  xof f $=CHR$ ( 23 ) +CHR$ ( 0 ) 

41 0  f eld=&8098 :clrfeld=&8082 :gen=&8000 
420  t1$=”EZLA  " 

430  t2$=CHR$ (13) 

440  FOR  c=240  TO  243 
450  t2$=t2$  +CHR$ ( c ) 

460  NEXT 

470  CALL  clrfeld:REM  Feld  loeschen 
480  | 

490  ••••••••*,*  Regelkatalog  einiesen 

500  FOR  adr=&A200  TO  &A211 
510  READ  et: POKE  adr, et 
520  NEXT 

530  DATA  0,0, 0,1, 0,0, 0,0,0 
540  DATA  0,0, 1,1, 0,0, 0,0,0 
550  ' 

560  '•***•*•***  Tastaturabfrage 

570  'E  =  Editor 

580  'Z  =  Zufallsverteilung 

590  'L  =  Spielfeld  loeschen 

600  'A  =  autom.  Generationswechsel 

610  '<SPACE>  =  naechste  Gen.  berechnen 

620  ' < ENTER >  =  Funktionen  E,Z,A  beenden 

630  ' 

640  a$=UPPER$( INKEYS ):IF  a$=""  THEN  640 
650  ON  INSTR(t1$,a$)  GOTO  690,850,940,970, 
1030 

660  GOTO  640 
670  * 

680  1  **********  Editor 
690  PRINT  xon$ ; 

700  re=1 :sp=1 

710  TAG : MOVE  8 *sp-1 0 , 408-8 *re : PRINT  cu$; 

720  a$=INKEY$:IF  a$  =  ""  THEN  720 

730  MOVER  -16,0: PRINT  cu$;:TAGOFF 

740  IF  NOT  INKEY (64)  THEN  f=1 :GOSUB  1060 

750  IF  NOT  INKEY (32)  THEN  f=0:GOSUB  1060 

760  ON  INSTR(t2$,a$)  GOTO  640,790,800,810, 

820 

770  GOTO  710 
780  ' 

790  IF  re  >1  THEN  re=re~1  :GOTO  710  ELSE  710 
800  IF  re<50  THEN  re=re+1 :GOTO  710  ELSE  71 
0 

810  IF  sp >1  THEN  sp=sp-1:GOTO  710  ELSE  710 
820  IF  sp<80  THEN  sp=sp+1:GOTO  710  ELSE  71 
0 

830  ’ 

840  *  **********  Zufallsverteilung 
850  f=1 

860  WHILE  INKEY$  <  >CHR$ (13) 

870  re=INT(RND*50 )+1 
880  sp=INT(RND*80 ) +1 
890  GOSUB  1060 
900  WEND 


910  GOTO  640 
920  ' 

930  ***********  Spielfeld  loeschen 
940  CALL  clrfeld:GOTO  640 
950  ' 

960  1 *********  Autom.  Genera tionswechel 


970  WHILE  INKEY$  <  >CHR$ ( 1 3 ) 
980  CALL  gen 
990  WEND 
1000  GOTO  640 
1010  ’ 


1020  ’*•••*****  Naechste  Gen.  berechnen 
1030  CALL  gen : GOTO  640 
1040  ' 

1050  '****»•  guR  Zelle  belegen/ loeschen 
1060  POKE  f eld+82  *re  +  sp , f 


1070  PRINT  xof f $ ; 

1080  IF  f  =  1  THEN  PLOT  -2, -2,1  ELSE  PLOT  -2 

,-2,2 

1090  FOR  x=8  *sp-8  TO  8*sp-4  STEP  2 
1100  FOR  y  =  402 -8 *re  TO  406-8*re  STEP  2 
1110  PLOT  x,y 
1120  NEXT  y , x 

1130  PRINT  xon$ ; : PLOT  -2,-2, 3 
1140  RETURN 


Serie 


1553  ) 
[1313] 

[1008  ] 
[801  ] 
[2234  ] 
[294  ] 
[1869] 
[1386] 
[2435] 
[2551 
[475  J 
[1167] 
[760] 
[350] 
[1773] 
[117] 
[2607] 
[822] 
[12953 
[350] 

[1  344  ] 
[1100] 
[117] 
12542  ] 
[493  ] 
11610] 
[2043] 
[33821 
[2689] 
[1247] 
[117] 
11916] 
[3579] 

[373] 
[117] 
[680] 
[1057  ] 
[854  ) 
[2214] 
£1209  ) 
[1681  J 
[891  ] 
[1230] 
[2116  ] 

[431  ) 
£117) 
[18261 
[1456  ] 

[10681 

[1669] 

[117] 

[11771 

[395] 

[1261  J 

[574  1 

[11961 

[823) 

(390] 

(373) 

(117) 

[2036] 

[1188] 

[117] 

[2073  ] 

[1261  ) 

[257] 

[390] 

[373] 

[117] 

[2147] 

11148] 

1117] 

12027) 

11610  ] 

(1313) 

(2593  ) 

[2583] 
[2874  ) 
[471  ] 
[397] 
(1947  ] 
[555] 
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Backnang 


Berlin 


Ihr  starker 
Schneider-Partner 


mukra 

DATEN -TECHNIK  | 

Schöneberger  Straße  5  •  1000  Berlin  42  •  Tel  030-7S2  91  S0/60 


,-r  K°A4/u 

^  *0, 


% 


CPC 


A+C  Vertrieb,  1  Berlin  44.  Emser  Str.  18 


▼  _  Sh#-  yn 
Computepei  j 


Elektr.  +  elektronische  Gerate, 
Bauelemente  + Werkzeuge 

ELECTRONIC  VON  A-Z 

Stresemannstr.  95  •  Berlin  61 
Telelon  (030)2611164 


Bonn 


RADIO-FERNSEHEN 
HIFI- VIDEO 


SERVICE  SERVICE  SERVICE 


Plittersdorfer  Straße  206  Telefon  36  40  29 


Castrop-Rauxel 


EtC  GUTE  IDEE  NACH  DER  AM3EREN 

Schuster  Electronic 

COMCITNl  IN  S*£l<N  CONPjitn  |  EcEt^Pi 

C__  Schneider 

■%  ’iriv.-a» 

Vntragshandler 
^E  Commodore 
Vertragswerkstatt 

Obere  Munslerslr.  33  4620  Castrop- Rauxel  (0230513770; 


Düsseldorf 


...alles  für  die  Schneider-Computer! 

Hnmni  itnr  Tprm.inal 

Schneider 


COrtPUTER  Divismi 


’a  Schneider 

rnmQi  irco  rm jicinN 

L  Ul  II  L'ILIS  Ul?  13 IUI  I 


BOD 

BÜRO  ORGANISATION 
DATENTECHNIK 

Fnedenslraflf!  13  4000  Düsseldorf  I 
Tel  0211/308071 


Freiburg 


w*MenMi 


Südbadens 

kompetenter 

Computer-Partner. 


Kaiser-Joseph-Str.  232 
Ö  7800  Freibürg,  Tel.:  0761/2180225 


Hamburg 


Jetzt  auch  bei  uns: 

Joyce  und  CPC  464  +  6128 

Anwanderprogramme  z.B  für  Joyce: 
Wordstar  3.0,  d  Base  II,  MuHiptan, 
Rnanzbuchhaltvng,  Business  Pack, 
DR  DRAW,  DR  GRAPH,  Schach 


Große  Auswahl  an  Spiel-  und 
Anwenderprogrammen,  Zubehör  und 
Literatur  tür  SCHNEIDER  und 
COIMIODORE. 

Ginn«»  5  •  2000  Himberg  20  -Tel.  4204821 


autorisierter  FBchhandler 


ISOFT 

IWARE 

Iladen 


Löhne/Ostwestfalen 


ii)(  Schneider  VertragshSndier  &  Servicecenlei 
Hard-  &  Software  von  A-Z  lür  Ostwestlalen 

FRITZ  OBERMEIER 

A  'Computer*  HIFi*Video*TV 

^  alles  (iir  Schneider  vom  464  -  Joyce 

«i»  H»Mlb.b»>ol  -  Blrtbf  Str.  20  *  407*  Ulh«  I  *  Ttl.  05732/3248 


Nürnberg 


(*~-«Compulersloro 


HoetT&Naßp  1 1 
Ö500  Nürnberg  ÖO 
Tel  09i  |  '28  90  28 


.Schneider 


onpurcXOii>6ion 
Wir  lüliren  zu  den  original  SCHNEIDER-FTodukten  Sol  (wäre,  Bticner  und 
ZubeOOr  verschiedener  Firmen  wie  DATA  BECKER.  VORTEX.  CUMANA. 
ISS.  RUSHWARE,  MARKT  &  TECHNIK.  SYBEX.  VOGEL-Verlag  usw ! 


Rüsselsheim 


Qz  commodore  C3Schnetdef 

Dipl.  Ing.  Neuderth  -Computer 

Frankfurter  Str  23/Friedensplatz.  6090  Hüaaelahelm 
Tel  (0  6142)6  84  55  Tx  vided  4  182  982 


Würzburg 


HALLER  fiabH.  Würzburp 
dar  Spezialist  für  alle  ScheeldorCowputer. 
Hardware  -  Seitware  -  Zubehör  -  Service 
Bitteer  Sir.  *9  (Nieter  Kaethiui  Hertlel 
Telefon:  0831/18705 
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Schweiz 


Zürich 


Computarshop 

zentral  In  Seetach.  SctutftauKr  Sir  473,  8052  Zürich. 
Telefon  01-302  26  00 


Österreich 


II» 


ING.  BinJ5E»£££I22£"*  O 

»II 


Bl« 


ATARI  commodore 

vortex  sitor  EPSON  ländön 

A  4050  TRAUN  Slt.6EN8ÜfioERSTR  19  07229/40  1 


In  dieses  Händlerverzeichnis 
können  sich  alle 

IComputer-Händlerl 

eintragen  lassen 


Für  telefonische  Anfragen  steht  Ihnen 
Herr  Schnell  gern  zur  Verfügung. 
Tel.:  05651/8702. 


Anzeigenschluß 
für  die  nächste 
Ausgabe  (9/86) 
von 

Schneider  CRC 
International 
ist  der 
31.07.86 

Erscheinungstermin 
ist  der 
27.08.86 


Achtung! 

An  alle  CPC- User-Clubs! 
Suchen  Sie  noch  Mitglieder 
oder  wollen  Kontakte  zu  ande¬ 
ren  CPC- Usern  oder  Clubs 
knüpfen? 

Dann  schreiben  Sie  uns  doch 
einfach.  Wir  veröffentlichen 
jede  Anschrift  eines  CPC-User- 
Cubs  gratis! 

Falls  auch  Ihr  User-Club  sich 
einmal  vorstellen  möchte 
(evt.  mit  Foto),  nutzen  Sie 
unsere  Zeitschrift  als  Verbin¬ 
dungsglied  und  Kontaktadresse! 


CPC-Nutzerclub  "Fehler  im  System" 
sucht  weitere  Mitglieder  aus 
Ostwestfalen  &  Südniedersachsen 
Näheres  bei: 

Fritz-Peter  Nonnenbruch, 
Splittenbrede  1  1, 

4800  Bielefeld  i, 

Telefon:  (05  21)  88  79  70 
oder 

Gerd  Engelbarth, 

Aschener  Weg  1 , 

4509  Dissen, 

Telefon:  (0  54  21)  51  83 


IAC  -  International  Amstrad  Club 

Kölner  Straße  66, 

5630  Remscheid  1 1, 

Telefon:  (0  21  91)  6  51  21 


Syntax  Error 
Computerclub  Nordhorn 

(alle  Systeme) 

Infos  bei: 

Fred  Weber, 

Laarsfraße  23, 

4460  Nordhorn 

Telefon:  (0  59  21)  1  31  49 

oder: 

Heinz  Elbers, 
Württemberger  Straße  1, 
4460  Nordhorn, 

Telefon:  (0  59  21)  7  54  78 


Märkischer  Kreis  MK 
"Ernsthafte"  CPC  664/464  Anwender 
zum  Erfahrungsaustausch  und  zur 
evtl.  CPC-Clubgründung  sucht: 
Antonius  Gusik  DL1  DK, 

Bromberger  Straße  3 1 , 

5880  Lüdenscheid, 

Telefon:  (0  23  51)  8  39  1  1 


CPC-Club  MAGIC  KEY 

sucht  Mitglieder  im  Raum  Bremen 
Infos  bei: 

Michael  Hollmann, 

Starnberger  Straße  46, 

2800  Bremen  1 


ROMSOFT 

sucht  Kontakt  zu  anderen  CPC-Clubs 
und  -Usern. 

Geschäftsführer: 

Michael  George, 

Waldstraße  1  3, 

6630  Saarlouis  5, 

Telefon:  (0  68  31)67  01 


A.N.W.U.C. 

sucht  Kontakt  zu  anderen  CPC-Clubs 
C.  Heyliger  (President), 

41  Millwal!  Close, 

Gorton,  Manchester. 

Ml  8  8LL. 


JOYCE  USER-CLUB  NÜRNBERG 

Suche  Kontakte  zu  einem  Joyce- 
User-Club  in  Nürnberg  bzw. 
Interessenten  zur  Gründung  eines 
solchen. 

Ansgar  Zerfaß, 

Ammanstraße  26, 

8500  Nürnberg  40, 

Telefon:  (09  1  1)  43  67  78 


Kontakt  zu  Schneider  CPC  464- 
Besitzern  im  Raum  Hamm  gesucht. 

Henrik  Hünerhoff, 

Caldenhofer  Weg  44, 

4700  Hamm  1 


Schneider  Computerclub  Hamburg 

sucht  Mitglieder  in  ganz  Europa. 
Alexander  Scharf, 

Heimfelderstraße  60, 

2 1 00  Hamburg  90, 

Telefon:  (0  40)  7  90  93  53 


CPC- User  in  Rüsselsheim 
suchen  noch  andere  CPC-User 
zwecks  Erfahrungsaustausch. 
Bei  Interesse  bitte  melden  bei: 
Markus  Jöst, 

Amorbacher  Straße  52, 

6090  Rüsseisheim, 

Telefon:  (0  61  42)  3  33  31 


Berliner  User  Club 

sucht  Mitglieder,  auch  weibliche, 
jeden  Alters. 

Infos  von: 

Wolfgang  Windorpski, 
Gritznerstraße  38, 

1 000  Berlin  4 1 , 

Telefon:  (0  30)  8  22  77  50 


CPC  Clubgründung  angestrebt 

für  Kreis  Borken. 

Interessierte  bitte  melden  bei: 
Dominique  Weiß, 

Südring  6, 

4282  Velen  —  Ramsdorf 


Schneider  User  Club  Heilbronn 

sucht  noch  Mitglieder 

aus  dem  Großraum  Heilbronn 

Bitte  melden  bei: 

Mirko  Pecoroni, 
Deutschherrenstraße  6, 

7107  Bad  Friedrichshall-4, 
Telefon:  (0  71  36/67  01 


S.C.C.N-H 

Schneider  Computer  Club 
Neunkirchen- Herdorf 
Infos  bei: 

Oliver  Thiele, 

Am  Kirchweg  49, 

5908  Neunkirchen  5, 
Telefon:  (0  27  35)  31  66 


JOYCE-Userclub  Neugründung 

Saarland 

Kontakt  und  Info: 

Arthur  Borens, 

Im  Technologiepark  Dillingen, 
Postfach  1  1 05, 

Telefon:  (0  68  31)  7  30  52, 
D-6638  Dillingen/Saar 

Schneider-Computerclub  e.V. 

Abt.  Ostwestfalen/Lippe 

Info:  Computer-Freunde/Löhne  e  V 

Postfach  1101 

Telefon:  05732/3396 

4972  Löhne  1 


I 
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Anzeigen- Börse 


lllllllllllllli 


IM  HIN 


UCC-GREFRATH 

sucht  Kontakt  zu  anderen  Clubs 
Bitte  melden  bei: 

Carsten  Hoener, 

Velourstraße  19, 

4155  Grefrath  1 


Schneider  Computer  Club 

Heinsberg/Rheinland 
Helmut  Krings, 
Josef-Gaspers-Straße  25, 
5138  Heinsberg  1, 

Telefon:  (0  24  52)  57  1 0 


Schneider  Computer  Club  Hamburg 
sucht  Mitglieder  in  ganz  Europa. 

Alexander  Schorf, 

Heimfelderstraße  60, 

2100  Hamburg  90, 

Telefon:  (0  40)  7  90  93  53 


Clubgründung  angestrebt 

CPC  464  Raum  Engelskirchen 

Siegfried  Meyer, 
Lindenpfuhlstraße  32, 

5250  Engelskirchen 


Biete  an  Software 


★  ★  ★  SCHNEIDER  CPC  464  ★  ★  ★ 

★  Hannover's  ★ 

★  S0FTWARE7HEK  Nr.  1  ★ 

★  ★★★.★★★★★★★★ 

Mastertronic-Games  a.  C  9.90 
Warlord/Centre  Court  a.  C  29. — 
Music  Composer/Death  Pit  a.  C  32. — 
Fighting  Warrior  a  C  36. — 

Hyper  Sports  C/D  42/54. — 

The  way  of  the  Tiger  C/D  36/52. — 
Yie  ar  Kung  Fu  D  52. — 

Colossus  4  Chess  D  59. — 

Hi  Rise/The  Devils  Crown  a.  D  52  — 
Textomat  plus  CPC  6 1 28  D  198. — 
GRAPHICS  Lightpen+Software  98  — 
sofort  CSJ  NEWS  anfordern 

★  ★  CSJ  COMPUTERSOFT  J0NIGK  ★  ★ 

★  An  derTiefenriede  27, 3000  Hannover  1  ★ 

★  ★  ★  Tel.:  OS  11/886383  ★  ★  ★ 

★  ff  ★ 


SOFTWARE  -  TRAUMPREISE 

Weit  über  1000  Titel  lieferbar. 

Alle  gängigen  Heimcomputer, 
auch  für  Amiga  520ST,  IBM+Comp. 
Werden  Sie  Clubmitglied! 

Bis  zu  30  %  Nachlaß!!! 
ZODIAC-Softwareversand-Computerdub 
Zollstr.  1,  2810  Verden,  Tel.:  04231/2882 
Händleranfragen  erwünscht.  G 


Satellitenbahnberechnung  für  Funkamaleure 

auf  Joyce  8256.  Alle  Pr.  laufen  unter 
CP/M.  Info  g.  Freiumschlag. 

M.  Maday,  DC9ZP,  Bismarckstr.  28, 
2393  SÖRUP 


SUPERC0PY  -  DISC-K0PIERPR0GRAMM 

100  %MC/2.  Laufwerk/ alle  Fremd¬ 
formate  /  43  Tracks  /  alle  Sektor¬ 
größen  /  Sekt,  mit  gel.  DATA  AD.  M. 
jede  mögt.  Sektoranz.  DM  79,- 
zzgl.  VK,  V-Scheck,  NN;  Th.  Scholl, 
Tel.:  0711/362983  ab  1  7  Uhr 
7300  Esslingen  Wiflingshauserstr.  83 

G 


DIAS  ordnen  mit  dem  CPC 

bis  25000  Dias  pro  Diskette. 
Suchzeit  ca  1  Sekunde. 

Info  gegen  Rückporto. 

W.  Grotkasten,  Birnenweg  6, 
7060  Schorndorf,  Tel.:  071  81/42846 

G 


SCHNEIDER-CPC-Progromme 

aus  Eigenentwicklung  Gratisinfo 
anfordern  bei  Friedrich  Neuper, 
Postfach  72,  8473  Pfreimd  ff 


TASWORD-D+COPY+PRINT,  D  3", 

orig,  neu,  nur  1 20-,  TeL:  0821/706502 


★  MICA  DM  1 76,— 

KASSEMBLE  DM  79,90 

★  STAR  WRITER  I  DM  169,— 

MOS  DM  1 69,— 

★ 

ASS- WARE,  Postfach  1441 
★  4830  Gütersloh,  Tel.  05241/29953 

G 


■  JOYCE  ■■  LacoScript- Fibel  ■ 

Präzise,  systematische  Kurzanleitung. 

19,-  DM+Porfo+  Nachnahme. 
Walter  Ehlers,  2000  Hamburg  56, 
Rheingoldweg  5,  Tel.:  040/813721 


Prof.  Musikverwaltung!  Tel.  05031/4302 


SOFTWARE  für  Joyce 

★  Adressverwaltung  m.  Briefdruck 

{variable  Eingabe,  Sortieren,  Se¬ 
lektieren,  komfortable  Serienbriefe, 
usw.)  DM128,- 

★  Biorhythmus  (tab./graph.)  DM  38,- 
Vorkasse  oder  Nachnahme 

G.  Niemann,  Karl-Valentin-Weg  10 
801  1  Kirchheim 


Original  Software  für  CPC  464 

Dafamat,  Textomat,  Budget-Manag. 
m.  Handbuch+Disk.  je  DM  80,- 
zus.  DM  200,- 

V  0212/33671  8  ab  1 9.00  Uhr 


Achtung!  1t  Ir  Alles  Originale  Ir  Ir 

3  Zoll  Elite  dtsch.  59,-/  Marco  Polo  1 
25,-  /  Budget  Manag.  45,-  /  Thorr- 
Trilogie  45, -/Win.  Sports  30,-  DM. 
★  5,25  Zoll  von  Data  M.  Kassenbuch 
20,—  Verwaltungsarch  Kassetten: 
Master  Chess  30,-  DM. 

Das  Geheimnis  /  Harrier  Attack  / 
Ghostbusters  /  Gremlins  /  Manie 
Miner  /  Codename  Mat  je  20,-  DM 
Alien  Break  In  /  Atom  Smasher  / 
Erbert  /  The  Wild  Bunch  /  Grand  Prix 
Driver  je  1  0,—  DM 
Chiller  /  Nonterraqueous  /  Locomo- 
tion  /  Finders  Keepers  je  7,—  DM 
Schneider  Basic  T.  1  +  2  59  —  DM 
dk'tronics  Graphiks  LPEN  40,-  DM 
NLG  401  mit  Traktor  499,—  DM 
dataphon  s2 1  d  1 50,-  DM 
Alle  Artikel  zuzügl.  3,—  Porto+ 
Verpackung 

Telefon:  (040)  6  47  25  00  G 


JOYCE  PCW  8256 

FAKTURA-CONTROL,  3"-Disk  89,-  DM 

Fakturieren  mit  Adress-Verw.  und  autom. 
Mahnprogr.,  offene  Posten  je  Kunde. 

FAKTURA-CONTROL  PLUS,  3"-Disk  139,-  DM 

zusätzi.  mit  Artikel-Bestandsdatei, 
Umsatz-  u.  Mindestbestandskontrolle. 

BAUFINANZIERUNG,  3"-Disk  189,- DM 

Für  Finanzierungsberater  /  Makler 

Indiv.  Programme  zum  Festpreis. 
HASHAGEN,  Tel.:  06073/61993 

Eckstr.  1  1,  61  13  Babenhausen  3, 


Jetzt  aber  schnell 

LOHNSTEUER- JAHRESAUSGLEICH  '85 

Bis  zum  30.9.  müssen  Ihre  Anträge 
beim  Finanzamt  sein!  Für  Schneider 
664  und  6128  bieten  wir  das  Rechen¬ 
programm  für  Ihren  Lohnsteuer-  oder 
Einkommensteuer- Jahresausgleich: 

PRIVAT  -  '85 

Damit  erhalten  Sie  die  kompletten  und 
aufgeschlüsselten  Ausrechnungen.  Ein¬ 
facher  geht  es  nicht!  Für  nur  60,00  DM 
plus  Nachnahmegebühr.  Den  Pro¬ 
spekt  gibt  es  für  80  Pfennig  in  Brief¬ 
marken,  Auch  für  Commodore  C  64, 
Atari  260/520  und  Enterprise  128 
geeignet. 

dialog  partner  in  berlin  gmbh 
Postfach  360  205,  1 000  Berlin  36 


★  ★  ★  ESCHCOMP-SYSTEM  ★  ★  ★ 
EINNAHME/ÜBERSCHUSSRECHNUNG 

sehr  bedienungsfreundlich  für  Ärzte- 
Masseure  u.  alle  freien  Berufe. 

20  Einnahmekont.  1 20  Ausgabekont. 
auf  Wunsch  bis  insg.  500  Konten. 

Ko  frei  definierbar,  b  999  Bu/M 

Kostensfellen-Auswerfung  . 

Umsatzsteuervoranmeldung  . 

Steuersätze  frei  def.  und,  und  . 

1  /  2  Laufwerke  einstellbar . 

für  alle  SCHNEIDER  Computer  . . 

und  für  VORTEX  IW  5,25"  . 

DM  288,—  incl.  MwSt. 

LEHRER  -  SCHULVERWALTUNG  Progr. 
für  SCHNEIDER  Comp  mit  Disc  3" 
Grundsch./Fachschu./Notenverw 
Zeugn.  drucken  mit  Bemerk,  (Bay) 

Soziogramm,  Quali  und,  und . 

Paukerpgr.,Wochenplan,  Mathetr. 
Info  anfordern. 

DM  398,—  incl.  MWSt. 
VERSICHERUNGS-AGENTUR-Programm 
bis  1000  Datensätze  p/Disk,  Alters- 
Berufsgruppen-,  Terminaktionen,  mit 
Terminkalender,  Uberweisungsträger 
drucken,  Maske  frei  definierbar, 
SCHNEIDER  3"  u.  VORTEX  5,25" 

DM  358, —  incl.  MwSt. 

1  /  2  Laufwerke  einstellbar 

SUPER  LOTTOPROGRAMM  für 

SCHNEIDER  3"  u.  VORTEX  LW  5,25" 
Info  anfordern. 

mit  allen  Schikanen  DM  99, — 
STAR  Drucker  NI  10  mit  Modul  nach 
Wahl  DM  898,—  incl.  MWSt. 

Wir  haben  über  500  Programme  für 
SCHNEIDER  Computer  -  Liste 
anfordern  gegen  Freiumschlag  oder 
2,—  DM  in  Briefmarken  bei 
ESCHCOMP-SYSTEM,  E.  Scheithauer 
8391  Perlesreut  /  Tel.:  08555/1390 
Händleranfagen  erwünscht 

G 


Viele  preiswerte  Spiele,  Mathe,  Anwend. 
(z.B.  MINIVISICALC)  von  2-28  DM! 
Katalog  geg.  1 ,-  DM  von 
SCHNEIDERSOFT  Andreas  Wagner, 
Garfenstr.  4,  820 1  Neubeuern 


ZYKLUS  —  bekannt  aus  Rundfunk  und 
Presse  —  ist  das  ERSTE  Prgrm.  zur 
Familienplanung. 

Jetzt  für  alle  CPC-Rechner! 

Disk  3"  od.  VDOS  2.0- Disk  5  Va". 
Ausf.  Handbuch;  kompl.  DM  69,—. 

★  INFO/BEST.:  R.+  K.  Schäfer  ★ 

★  Postf.  3224,  D-5800  Hagen  1  ★ 


Original  Textomat  /  Data  Becker 
Diskette  +  Handbuch,  ungebraucht 
VB:  75,00  -  Tel.:  0224 1  /83 1 68 


Konto  2000-Geldv  C 
Star-Tex  Textverarb. 
Text-Super-5  Textv.  C 
Economic- Car  C 

Börsenspiegel  C 

Informationen: 

(C  =  Cass.) 

(D  =  Disc.) 


49, -/D  59,- 
Disc  79,- 

29, -/D  39,- 
C  29,— /D  39,- 
C  29,— /D  39,- 
Th.  Wieland 
Falkertstr.  71 
D-7000  Stuttgart- 1 


Verk.  1 2  tolle  Spiele 

zu  Niedrigstpreisen  (6-18  DM) 
W  05661/3673 


RIESEN- AUSWAHL 

Spiel-  und  Anwendersoftware 
Liste  anfordep  M.  Potthoff 
4543  Lienen  —  Postfach  1290 


BIORHYTHMUS 

druckt  Ihre  natürlichen  Lebensrhythmen 
als  Sinuskurven  oder  Biozahl.  m. 
Erklärg.  f.  I  -  365  Tage. 

Dieses  Superprogramm  schrieben 
Biorhythm,  u.  Grad.  Ing.  f.  d.  JOYCE. 
Einführungspreis  nur  DM  74,85 
Klaus  R.  Junker, 

Postfach  1718, 

6380  Bad  Homburg  v  d.H. 


★  NEU  ★  ★  CHEMIE  ★  ★  NEU  ★ 

Datenb.  /m.  Ch.-Test  /  Lernsoftw./ 
PSE/Atommodell/Elektronensyst. 

4  Programme  (!m.  als  80  KB!)  30,-  K/ 
40,-  D  /  Typ?  /  Info  2  —  Bfmk. 

★  U.  Hox,  Ackerstr.  65, 4 1 90  Kleve  ★ 


Börsenprogramm  für  Profis 

Chart,  Zoom,  gl.  Durchschnitt,  Linien, 
Balken,  Überlagerung,  Optionsscheine, 
Seriendruck  Info  1,- DM, 

Disk  200,-  DM,  Winfried  Schmitt, 
Enzianweg  24,  8134  Pöcking 


Fragen  Sie  uns  nicht,  wieso  wir  so  billig 
verkaufen!  Z.B.: 

3-D  Clock  Chess  f.  JOYCE  62.90 
Heroes  of  Kam  f.  JOYCE  59.90 
Turbo-Adress  f  JOYCE  nur  127  90 
Und  noch  mehr  für  die  CPC's,  z.B.. 
Frank  Bruno's  Boxing  1  2  00 

Dun  Daragh  1  4.00,  Slapshot  1  4.00!! 
SUNSHINE-Software  -  A.d.  Schilde  1 4  • 
5270  Gummersbach-  TeL  0226 1 Z75752 

G 
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Landw.  Spitienprogramme 

für  CPC  6128 

Schlagkartei,  Sauenplaner  usw. 
Datenservice  Wachendorf-Agrar 
28 1  4  Engeln  30 

Info  gegen  3,—  DM  Schutzgebühr  G 


Original  Star  Writar  I 

incl.  Kopie  DM  1 60,-;  T.  0762 1  /82364 


30.000  DM  für  sine  PC-Lösung? 

300  DM  mit  Schneider  CPC! 

Qualitätssoftware  für  das  Team  vom 
Bau: 

Massen-  u.  Flächenberechnung  nach 
REB;  Tiefbau;  Statik  u.a. 

★  Info/Best.:  Dipl.-Ing.  Schäfer  ★ 

★  Postf.  3224,  D-5800  Hagen  1  ★ 


★  ★  ★  CPC-Software  ★  ★  ★ 

Billige  Software  für  Ihren  CPC 
gibt  es  bei:  TB-Software,  Postfach  38, 
7454  Bodelshausen 


Biete  an  Hardware 


Joyce-Speichererweiterung 

512  KB  nur  DM  135,-,  Lieferung 
gegen  V- Scheck.  Krawczyk- Versand, 
Pf  280313,  1000  Berlin  28 

G 


CPC  6 1 28  Grünmonitor  n.  3  Man. 

alt  DM  1200,-  9  06192/5731 


Drucker  NlQ-401  4-  Ersatzband. 

Ein  Jahr  alt.  Für  490,—  DM  zu  verk 
9  02136/31773,  ab  19.00 


CPC  4M  Grün  +  DDI-1  VB  1250,- 
nur  ausprobiert  -  T.:  0201/596692 


Zweitfloppys  f.  alle  CPC's  anschlußfertig. 

5"  390,-  DM.  3"  260,-  DM. 
versch.  Hardware.  Info  W.  Geiselhart, 
Fürst-Friedrich-Straße  5, 

7482  Krauchenwies  1,1:  07576/7170 


Joyce  Pius  3  Mon.  m.  Gar.  und  viel 
Software;  Tel.:  06221/767470 


Verkaufe  CPC  464  DD1  je  450,-  DM 

Wordstar  1  1 0,—,  Devpack  80,— 
org.  mit  Handbücher.  Für  Spiele  und 
Literatur.  Info  anfordern, 
bitte  Freiumschlag.  K.  Tripke, 

Am  Wedemarkbad  1  5, 

3002  Wedemark  1 ,  Tel.:  05 1 30/1 076 


CPC  464 -Verkauf  Komplettanlage 

CPC  464  mit  Farbmonitor  4*  Bücher, 
Diskettenlaufwerk  DDI-1  mit  original 
Texpack  4-  Topcalc 
Drucken  Star  Gemini- 1 0X  4-  Kabel 
VB  DM  2200-,  auch  Einzelverkauf. 
Nach  1 7  Uhr  -  Chiffre:  090786 


CPC  6128  (grün)  4-  Wardst.  -Hit.  4- 
Disk.  für  1499,-  V  0941/27483 


CPC  464  Grün  4-  Drucker  NLQ  401 
4-  Software  4-  Data  Becker- Lit. 
VB  1200,-;  Tel.:  09252/6626 


CPC  464  Farbe,  DDI,  Vortex  SP51 2 
Turbo  Pascal,  v  Bücher,  Softw  NP: 
4000,-  f.  VB  1 790,-.  Tel.:  07 1 82/2290 


Verkaufe:  CPC  464  4-  GT64  (Grün) 
4-  Drucker  NLQ  401  DM  850- 
Telefon:  071  1/682053 


CPC  464  Grün  4-  DDI-1  4-  Disk  4- 
Bücher4-Anw.-Soft.4-CPC- Int.- Hefte 
ab  06/85  NP  ca.  2 1 00  -  DM,  1  a-Zust. 
kompl:  VB  1 400,-  DM,  Einzeln:  VB 
Tel:  02628/2420  ab  18  Uhr 


CPC  464  Grün  DM  560,—,  M  .  Voorwold, 
Kruppstr.  98,  4000  Düsseldorf  1 


Verk.  NLQ  401  4-  Traktf.  4*  Farbband, 
Roth.  2  LW  5  25"  je  DM  500,- 
Software  VB,  Tel.:  06103/2534 1 


CK  464  Calor  4-  Lightpen  4-  5  Bücher 
4-  Joy  4-  Elite  4-  Hexenküche  4- 
4  Sonderhefte  4-  Schneider  Int  ab 
7/85  —  7/86  und  anderes  Zubehör. 

Neupreis  —  2100,-  DM 
VHB  kplt.  -  1600,-  DM 

Telefon-.  07225/1018  ab  18  Uhr 


4-Farben-Drucker-Plotter  ★  NEU ★ 

Mit  Centronics,  auch  als  elekt. 
Reiseschreibmaschine  DM  450,- 
V  07681/1736 


SP-64/256  Aufrüstsatz  DM  64,— 

2.  Laufwerk  f.  V0RTIX  Fl  DM  359,- 
Günstige  Speicher- IC's  und  Floppys. 
Tel.:  089/806823,  17-  19  Uhr 

G 


Floppy  DDI-1  498,-  DM,  FD- 1  398,-  DM, 
Kontroller  einzeln  229,-  DM. 
Manfred  Kobusch,  Bergenkamp  8, 
4750  Unna,  Tel.:  02303/1  3345 


★  ★  CPC  6128  mit  Grünmonitor  ★  ★ 

6  Mon.  1  100,-  DM.  Datenrecorder, 
1 4  Disk,  Tasword,  Wordstar:  DM  250,- 
Alles  zusammen  1  350-  DM 
9  089/7001776,  Stefan  Ries 


Verkaufe  CPC  664  (grün)  mit 

Vortex  Speichererweiterung  SP  64  4- 
Literatur  4-  Software. 

Preis:  700,-  DM,  9  02274/6141 


464  4-Farb-Mon.  850,-,  T.  0531/346248 


Verk-  Drucker  401,  9  04349/1222 


CK  464-,  CK  664-,  CPC  6128-User 
Lichtgriffel  mit  Programmen 
und  dt.  Anleitung  nur  DM  49,— 
Versand  gegen  Scheck/Nachnahme 
Info  gratis!  Fa.  Schißlbauer 
Postfach  1 1 7 1  S,  8458  Sulzbach 
Tel.:  09661/6592  bis  21  Uhr  G 


CPC  464  Green  Monitor,  Vortex  Doppel- 
Floppy,  Joystick  gegen  Gebot  zu 
verkaufen.  Köln,  Chiffre:  100786 


Verk.  wegen  Systemwechsel 

CPC  464  m.  GT644-DDI-1 4-NLQ  401 
4-Lightpen4-DEVPAC4-Firmware4- 
Software4- Bücher  u  Zeitschr.  VB 
2700,-,  NP  3700,--  Tel.:  0671/36563 


Joyce-PCW  8256  mit  Software 

Multiplan  -  DR  GRAPH  -  VB  1 500,-  DM; 
Telefon:  02361/12166 


CPC  464,  Farbe.  9  02154/7839 


★  ★★★★★★★★★★ 

★  HELIS0FT  ★  Tel.:  05609/9838  ★ 
★★★★★★★★★★★★ 

★  CPC  6128  grün  975,-  ★ 

★  CPC  6128  färbe  1  645,-  ★ 

★  CPC  464  grün  649,-  ★ 

★  DDI  1  475,-  ★ 

★  Zweitlaufw.  464  249,-  ★ 

★  Joyce  8256  1599,-  ★ 

★  51 2  KB  8256  129,-  ★ 

★  FD  2  8256  599,-  ★ 

★  Joyce  8512  2129,-  ★ 

★  DMP2000  659-  ★ 

★★★★★★★★★★★★ 

★  ADREVAMAT  +  die  Adreßver-  ★ 

★  waltung  für  den  Joyce.  ★ 

★  Superschnell,  enorme  ★ 

★  Kapazität  89,-  ★ 

★  DRUCKERBOX  zwei  Drucker  ★ 

★  an  einem  Rechner  oder  zwei  ★ 

★  Rechner  an  einem  Drucker  89,—  ★ 

★★★★★★★★★★★★ 

★  Alle  anderen  Artikel  ähnlich  ★ 

★  günstig.  Versandzentrale  ★ 

★  Tel:  05609/9838  ★ 

★  Ladenverkauf,  Friedrichstr.  1 8,  ★ 

★  3500  Kassel  G  ★ 

•kirir'kirir-kir-k'k'kir 

■  ■■  ★  SP 51 2  RAM-KIT  ★  ■■■ 

Aufrüstkit  für  Vortex  SP64  auf 
512  KByte  RAM,  nur  198,-  DM 
Eichbauer,  I:  091 35/1 252  ab  1 4  Uhr 

G 


CK  464  Color+NLQ  401  +Joy+Abdeck- 

haube+v.  Literatur+Software  ★  zu 
verk.  für  VHB  1800,-  ★  9  06758/8281 
ab  1  9,00  Uhr,  Klein,  6551  Bockenau 


CPC  464  Grän  3  Mon.  mir  450,—  DM 

9  0651/10809 


CPC-Bürher  und  Software  zum  halben  NP 

9  0651/10809 


Power-CPQ  IBM-Gehäuse;  2  Laufwerke; 

Color;  512KB;  NLQ-Drucker,- 
26  Bücher;  1 30  Disketten  +  Box; 
sämtl.  Zeitungen;  viel  Zubehör,-  sonst. 
NEU:  ca.  1 2000  -  DM;  VB:  4500,-  DM; 
Tel.:  0221/536739 


Verk.  CPC 464  +  Floppy  +  umfangr.  Lit 
+  Prog.  für  DM  1 350,- 
9  02382/3420 


/  UPEttA  NGEB0  TEffl 

3"- Disketten  10  St.  nur  DM  59,- 
Drucker  CPA-80GS  DM  598,- 
CPC  6128  Grün!!  DM  948,- 
Computer*  Versand ‘Trier*  Pf  2106, 
Tel.:  0651/16366  Info  anfordern! 

G 


. Anzeigen- Börse . 


Höchstpreise  für  Ihr  JUtgerät 

zahlt  ‘Computer*  Versand ‘Trier 
Postfach  2106,  Tel.:  0651/16366 

G 


CK  464  Calor  neuwertig  mit 

Zubehör  für  VB  900,-  abzugeben. 
9  0651/10809 


Fmb-CPC  DDI-1,  NLQ  401, 2  Joysticks, 
5  Bücher  und  Software  DM  2000,— 
9  0531/872222 


JOYCE  5  V«  Zoll  Floppylaafwerk  (EXT.) 

zu  verkaufen,  1  MB.  Tel.:  061 73/5034 


JOY«  Mus  5I2K  NEU  +  Software 

2100,-  Tel  :  0906/6784  nach  17  h 


6128  mit  Grünmonitor,  Schneiderfloppy 
FD  1,  Schneiderdrucker  DMP  2000, 
2  Joystick,  Data -Recorder,  CPC- 
Station,  Netzteil  MP-2,  RS  232-lnter- 
face  mit  Netzteil,  mit  umfangreicher 
Software  wie:  Compack,  Multiplan, 
Wordstar,  dBase  II,  Star  Writer, 
Schneider-  Basic-  Kurs,  Cumputer-  Kurs, 
3D-Schach,  Spielesammlung  mit  20 
Spielen  etc.  mit  ca.  25  Disketten, 
Markt  &  Technik  Handbüchern,  CPC- 
Intemational  komplett,  sowie  sonstige 
Literatur,  Handbücher  und  Fachzeit¬ 
schriften;  alles  mit  Garantie,  Jan  '86 
gekauft. 

Neupreis  6  140,00  DM  abzugeben 
für  3.800,00  DM. 

9  09776/247 


Suche  Software 


Suche  dringend  Schulsoftwore 

für  CPC  61 28 

(Stundenplan  -  Schülerverwaltung  - 
Notenverwaltung  u.ä.) 
Angebote  an: 

V.  Strehlow, 

Dammstr.  42,  2300  Kiel-1 


Statistik  (t-Test  otc.)  für  Joyce 

ges.  Goetze  H.,  Sedanstr.  1 9, 2000  HH  1 3 


Fortran  für  CPC  664  Gesuchll 

Chiffre  260686 


Suche  für  Joyce  PCW  8512 

Terminprogramm 

Tages- Wochen-Monats-Jahresterm. 
G.  Rockenfeiler,  Haarweg  63, 
5870  Hemer,  Tel.:  02372/1 853 


Suche  Programme  für  Joyce 

spez.  f.  Büro  u.  Kleingewerbe 
Rechnungen,  Buchhaltung  etc 
Tel.:  04221/87175  ab  1.8.,  19  Uhr 


Suche  für  Joyce 
alle  Arten  von  Software. 
Angebote  mit  Programmbeschr.  an 
R.  Wiedersich,  Hainstädfer  Str.  42, 
6452  Hainburg  2 


i 
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ÜberweisungsdnKk-Projramm  mit  OCR- Al 
Zeichensatz  für  464  +  DMP  2000 
gesucht.  Angebote:  Thomas  Winiarski, 
Pf.  305808,  2000  HH  36 


Suche  Software  für  CPC  61 28 

A.  Hecht,  Fachenfelder  Winkel  4 
2105  Seevetal  3 


Russisch«  Schriftzeichen 

für  Joyce  gesucht:  Drucker  und 
Bildschirm 

Telefon:  02101/43359 


Wordstar  origin.  kpl.  für  6128 

3"- Disk.,  Tel.:  0681/399821  Bonner 


Suche  Hardware 


Suche  DDI-1.  IT  05346/1331 


Fortran  für  CPC  664  gesucht! 

Chiffre  260686 


Suche  Drucker  für  CPC  464 

G.  Klemp,  Apfelstieg  1, 2160  Stade 


WANTED!  Seikosha  GP550A  od.  CPC 
W.  Lack,  Sieringstr.  29,  6230  Ffm 


Verschiedenes 


Ulli  BESUCHEN  SIE  UNS  !!!!! 
ELEKTRONIK  t  COMPUTERTAGE  SAAR 

Verkaufs-Informationsmesse  5.  -  7.  9 
Kongresshalle  Saarbrücken, 

Info:  PF  101260,  6620  Völkingen 

G 


Antireflex-  und  Kontr.-Scheibe  für 
Schneider  CPC  32, —  DM 

Videodafei-Programm  a.  Systeme 
CPQBM  u.  Kompat.  (Disk)  48  —  DM 
IVS-D.  Kamp,  Köllmannstr.  13 
4300  Essen  14,  Tel.:  0201/594323 

G 


Etikette  genau  passend  für  3"-Disketten 

Bedruckt  mit  A-  u.  B-Seite. 

20  Stck.  nur  10,-  DM  inkl.  Porto. 
Nur  gegen  Vorkasse  Schein/Scheck. 
E-H-E,  Schroerstraße  34, 

390  Gladbeck  G 


Tausch 


Tausche  super  Spiele  für  Schneider 

CPC  464.  Alles  nur  auf  Kassetten 
Zuschriften  an:  Jürgen  Mückstein, 
Marienbader  Str.  1 6, 

8851  Mertingen 
Jede  Kassette  wird  beantwortet 


Software-Tauschpartner  gesucht 

nur  Cassetten  für  CPC  464  sowie 
800XL  und  C64  Listen  erbeten  an 
Johann  Feddermann,  Breiter  Gang  8, 
2000  Homburg  36 


Colour-Monitor  CTM644  gegen  GT-6S  + 

Ausgleich  Tel .  05323/4096 1 


Das  Ist  Ihre  Chance... 
schon  eine  Kleinanzeige  bringt 
oftmals  groBen  Erfolg  und  hilft 
neue  Kontakte  knüpfen. 

Nutzen  Sie  unser  Angebot  und 
profitieren  Sie  von  der  Tatsache, 
daB  unsere  Zeitschrift 
„Schneider  CPC  International" 
jeden  Monat  von  mehreren  zig¬ 
tausend  Computer-Interessierten 
gelesen  wird. 

Möchten  Sie  etwas  verkaufen, 
tauschen  oder  suchen  Sie  das 
„Tüpfelchen  auf  dem  I”  -  dann 
sollten  Sie  die  eigens  hierfür  be¬ 
stimmte  Bestellkarte  Im  Heft  aus¬ 
füllen  und  an  unseren  Verlag 
absenden. 

Ihre  Annonce  erscheint  dann  in 
der  nächsterreichbaren  Ausgabe. 

Wir  möchten  ausdrücklich  darauf  hinwei- 
sen,  daß  wir  keine  Anzeigen  veröffent¬ 
lichen,  aus  denen  ersichtlich  ist,  daß  es  sich 
hierbei  um  Veraußei ungen  von  Raubkopien 
oder  dergleichen  handelt 
Des  weiteren  machen  wirdarauf  aufmerksam, 
daß  indizierte  Computerspiele  nicht  in  Form 
von  Anzeigen  beworben  werden  dürfen 

Die  Redaktion 


C’86  im  Zeichen  des  Handwerks 


Computer-Ausstellungen  sind  in  der 
Regel  immer  Anziehungspunkte  der 
Massen.  Die  C’86  in  Köln  hatte  vom  1 2. 
-  15.  Juni  ihre  Pforten  geöffnet  und 
glänzte  durch  die  Abwesenheit  vieler 
namhafter  Aussteller  sowie  durch  ein 
nur  schwer  zu  durchschauendes  Kon¬ 
zept. 

Schon  am  ersten  Ausstellungstag  gab 
es  die  ersten  Mißverständnisse,  was 
den  Informationsfluß  Veranstalter  - 
Publikum  anbetraf.  Während  vor  den 
Toren  der  Kölner  Messehallen  zahl¬ 
reiche  interessierte  Besucher  auf  Ein¬ 
laß  warteten,  zeigten  sich  Aussteller 
und  Veranstalter  überrascht.  Der 
Grund  ist  denkbar  einfach;  wurde 
doch  der  erste  Ausstellungstag  aus¬ 
schließlich  dem  Fachhandel  und  der 
Presse  gewidmet,  nur  gewußt  hatte 
dies  niemand! 

Da  war  es  auch  nicht  verwunderlich, 
wenn  dem  einen  oder  anderen  Ausstel¬ 
ler  ein  müdes  Lächeln  über  die  Vor¬ 
fälle  im  Gesicht  stand;  aufgeregt  hat 
sich  wohl  niemand  und  aufregend 
war  es  dann  schon  gar  nicht. 

Der  Gang  durch  die  beiden  Ausstel¬ 
lungsetagen  verlief  zumindest  für  uns 
ohne  große  Zwischenstops,  es  war 
schlichtweg  eine  Enttäuschung. 
Ganz  eindeutig  dominierten  die  An¬ 
bieter,  die  Hard-  bzw.  Software  für 
das  Handwerk  zeigen  konnten;  vom 
Programm  für  Maler  bis  hin  zu  gan¬ 
zen  Branchenlösungen  reichte  die 
dort  gezeigte  Palette. 


Dem  interessierten  Schneider-An¬ 
wender  konnte  da  schnell  die  Lust 
vergehen.  Nur  wenige  Aussteller  wa¬ 
ren  mit  Produkten  für  die  CPC's  bzw. 
Joyce  bestückt. 


Neues  Diskettenformat 


Am  Stand  von  fischertechnikcompu- 
ting  war  zu  erfahren,  daß  die  Software 
für  die  Schneider-Baukästen  in  Kür¬ 
ze  auch  auf  Diskette  angeboten  wird, 
so  daß  auch  die  664-  und  6128- 
Besitzer  in  den  Genuß  dieser  Hard¬ 
ware-Erweiterungen  kommen. 

Der  Sybex-Verlag  präsentierte  seine 
komplette  Buch-  und  Softwarereihe, 
die  inzwischen  auf  ein  ansehnliches 
Potential  für  Schneider-Computer 
angewachsen  ist.  Hier  wurde  uns  die 
Star- Datei  angekündigt,  die  das  Pro¬ 
gramm  Star-Texter  in  Kürze  um  eine 
weitere  Anwendung  ergänzen  wird. 
Des  weiteren  war  beim  Blick  in  das 
reichlich  gefüllte  Bücherregal  festzu¬ 
stellen,  das  Sybex  die  Bücher  zuneh¬ 
mend  mit  einem  Hardcover  versieht, 
was  zweifelsohne  dem  Aussehen 
nach  dem  täglichen  Gebrauch  zu 
Gute  kommt. 

Überraschend  verlief  dann  der  Be¬ 
such  am  Stand  von  datatech.  Hier 
wurden  Disketten  "made  in  Ger- 
many”  angekündigt.  Laut  Auskunft 
ist  demnächst  mit  der  Auslieferung 


von  3”-Disketten  zu  rechnen,  die  zwi¬ 
schenzeitlich  nur  sehr  schwer  erhält¬ 
lich  waren. 

Zusätzlich  will  diese  Firma  auch 
Disketten  im  1  l/2"-Format  herstei¬ 
len,  allerdings  fehlen  dazu  bisher  die 
entsprechenden  Laufwerke.  Diese 
kleinen  Scheiben  sollen  eine  Spei¬ 
cherkapazität  von  1  MB  besitzen,  was 
zweifelsohne  eine  revolutionäre  Ent¬ 
wicklung  einleiien  würde.  Abzuwar¬ 
ten  bleibt,  für  welches  Format  sich  die 
großen  Computerhersteller  entschei¬ 
den  werden;  zur  Zeit  scheint  sich  der 
Trend  in  Richtung  3.5"  zu  bewegen. 
Höhepunkt  der  C'86  war,  was  jeden¬ 
falls  das  Zuschauerinteresse  an  be¬ 
traf,  die  parallel  staltfindende  Com¬ 
puterschach-Weltmeisterschaft.  die 
bereits  zum  fünftenmal  ausgetragen 
wurde.  Hier  mußte  sich  Vorjahressie- 
ger  Mephisto  mit  zahlreichen  Kon¬ 
kurrenten  auseinandersetzen,  das  Er¬ 
gebnis  stand  zu  Redaktionsschluß 
noch  nicht  fest  und  wird  später  nach¬ 
gereicht.  Abschließend  bleibt  zu  be¬ 
merken,  daß  viele  führende  Compu¬ 
terfirmen  nicht  anwesend  waren,  und 
damit  konnte  man  den  Eindruck 
nicht  verwehren,  daß  Messetermin 
und  -Konzept  nicht  glücklich  ge¬ 
wählt  waren. 

Es  kann  nur  noch  besser  werden,  und 
damit  dürfen  wir  auf  die  C’87  miteini- 
ger  Spannung  w'arten. 

(SR) 
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Aktuelle  CPC  Buchhits 


Ein  Muß  für  jeden,  der  sich  professionell 
mit  dem  CPC  6128  oder  dem  CPC  664 
beschäftigt.  Einführung  In  das  System,  den 


Prozessor,  das  Gate  Array,  den  Video-Con¬ 
troller,  den  Schnittstellenbaustein  8255, 
den  Soundchip,  die  Schnittstellen.  Mit  Dis¬ 
assembler  und  ausführlichen  Kommenta¬ 
ren  zu  den  Routinen  von  Interpreter  und 
Betriebssystem.  Ein  Superbuch,  wie  alle 
Titel  der  INTERN-Reihel 
CPC  6126/664  Intern 
456  Sehen,  DM  69,- 


Wolien  Sie  in  BASIC  wie  ein  Profi  program¬ 
mieren?  Dieses  Buch  macht  es  Ihnen 
leicht.  Themenbereiche:  Variablen,  Zahlen¬ 
systeme,  Bits  und  Bytes,  Tokens,  String¬ 
bearbeitung,  Sortierung,  Laufschrift,  selbsf- 
definierte  Zeichen,  Windows,  Rundungen, 
Fehlerbearbeitung,  Kopierschufz,  Grafiken, 
Joystick,  Soundprogrammierung,  relative 
Dateien  u.v.m.  Viele  Beispielprogramme 
finden  Sie  In  den  entsprechenden  Kapiteln. 
Das  große  BASIC-Buch  zum  6128 
276  Seiten,  DM  39,- 


Der  2.  Band  CPC  Tips  &  Tricks  Ist  für  alle 
CPC  Besitzer  interessant.  Ob  sie  nun  einen 
464, 664  oder  6128  besitzen!  Aus  dem 
Inhalt:  Menuegenerator,  Maskengenerator, 
BASIC-Befehlserweiferungen,  Programmier¬ 
hilfen  wie  Dump,  BASIC-Zeile  von  BASIC 
aus  erzeugen,  wichtige  Systemroutinen  und 
deren  Nutzung,  Beschleunigung  von  Pro¬ 
grammen  u.v.m.  Wer  noch  mehr  über  sei¬ 
nen  CPC  wissen  will,  der  kommt  an  diesem 
Buch  nicht  vorbei! 

CPC  Tips  «t  Tricks  Band  II 
250  Selten,  DM  39,- 


Erlernen  Sie  die  Maschinensprache  ihres 
CPC.  Von  den  Grundlagen  der  Programmie¬ 
rung  über  die  Arbeitsweise  des  Z80-Prozes- 
sors  und  einer  genauen  Beschreibung  sei¬ 
ner  Befehle  bis  zur  Benutzung  von  S^tem- 
routinen  Ist  alles  ausführlich  und  mit  vielen 
Beispielen  erklärt.  Alle  Hilfsroutinen,  wie 
Assembler,  Disossembler,  Monitor  und  Ein¬ 
zelschrittsimulator,  sind  als  Listings  zum 
Abtippen  enthalten.  So  wird  der  Einstieg 
leicht  gemacht. 

Dos  Maschinensprachebuch  zum  CPC 
333  Selten,  DM  39,- 


Einsteiger  und  Profis  erfahren  alles  über 
die  Arbeit  mit  der  Floppy.  Nützliche  Routi¬ 
nen  zur  Verwaltung  der  Floppy,  wie  eine 
komfortable  relative  Dateiverwaltung,  ein 
Disk-Monitor  und  ein  Disk-Manager  sind 
als  Listings  zum  Abtippen  enthalten.  Eine 
Fundgrube  verschiedener  Programme  und 
Hilfsroutinen  mit  ausführlicher  Dokumenta¬ 
tion  der  ROM-Einsprungadressen.  Pflicht¬ 
lektüre  für  jeden  Anwender.  Stark  erwei¬ 
terte  und  überarbeitete  Neuauflage. 

Das  große  Floppy-Buch  zum  CPC 
422  Seiten,  DM  49,- 
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Endlich  CP/M  beherrschen!  Von  grundsätz¬ 
lichen  Erklärungen  zu  Speicherung  von 
Zahlen,  Schreibschutz  oder  ASCII,  Schnitt¬ 
stellen  und  Anwendung  von  CP/M-Hilfspro- 
grammen.  Für  Fortgeschrittene;  Fremde 
Diskettenformate  lesen.  Erstellen  von  Sub- 
mit-Dafeien  u.v.m.  Dieses  Buch  berücksich¬ 
tigt  die  Versionen  CP/M  2.2  und  3.0  für 
Schneider  464, 664  und  6128. 

Das  CP/M-ttainingsbuch  zum  CPC 
260  Seiten,  DM  49 - 


DFÜ  für  Jedermann  mit  dem  CPC  bietet 
eine  ausführliche  und  verständliche  Einfüh¬ 
rung  in  das  Gebiet  der  Datenfernübertra¬ 
gung:  was  Ist  DFÜ,  BTX,  DATEX,  Maiibox. 
Alles  über  Modems  und  Koppler.  Begriffs¬ 
erklärung:  Originafe,  Answer,  Halt-Duplex 
usw.  Eine  serielle  Schnittstelle  am  CPC,  RS 
232/V.24  simuliert,  Mailboxsoftware  - 
selbstgestrickt,  Postbestimmungen  u.v.m. 
Steigen  Sie  mit  diesem  Buch  In  die  Welf 
der  Datennetze  und  Datenfernübertragung 
ein.  DFÖ  für  Jedermann  zum  CPC 
303  Seiten,  DM  39,- 


Speziell  für  den  Hobbyelektroniker,  der 
mehr  aus  seinem  CPC  machen  möchte! 

Von  nützlichen  Tips  zur  Platlnenherstellung 
über  Adreßdecodlerung,  Adapterkarten  und 
Interfaces  bis  zu  EPROM-Programmier- 
board  und  -Programmiernetzteil  oder 
Motorsteuerung  für  Gleich-  und  Schritt¬ 
schaltmotoren  werden  machbare  Erweite¬ 
rungen  ausführlich  und  proxisnah 
beschrieben.  Am  besten  gleich  antangen! 
CPC  Hardware-Eniveiteningon 
445  Selten,  DM  49  - 
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EIN  DATA  BECKER  BUCH 


Dieses  Buch  führt  Sie  Schritt  für  Schrift  in 
die  Benutzung  des  Joyce  ein.  Diese  Einfüh¬ 
rung  geht  von  der  Installation  der  Geräte 
über  eine  Einleitung  in  LocoScripf  bis  hin 
zur  Programmerstellung  in  BASIC  und 
LOGO.  Auch  die  wichtigsten  Befehle  des 
Betriebssystems  CP/M  3.0  werden  leicht 
verständlich  beschrieben.  Der  ideale  Ein¬ 
stieg  mit  dem  Joyce! 

Joyce  für  Einsteiger 
248  Seiten,  DM  29,- 


LOGO,  eine  Sprache,  die  immer  beliebter 
wird  für  alle  CPC-  und  JOYCE-Anwender. 

LOGO  ist  einfach  zu  erlernen,  aber  vielsei¬ 
tig  in  der  Programmierung.  Das  Buch 
befaßt  sich  unter  anderem  mit  folgenden 
Themen:  Rechnen  mit  LOGO,  Grafikpro¬ 
grammierung,  Wörter-  und  Listenverarbei- 
lung,  Prozeduren  und  Rekursionen,  Sortler- 
roufinen,  Maskengenerator,  Datenstruktu¬ 
ren  und  Künstliche  Intelligenz. 

Das  groBe  LOGO-ßuch  zu  CPC  und  JOYCE 
ca.  300  Seiten,  DM  39,- 

DATA 

Merowingerstr.  30  •  4000  Düsseldorf  Tel.  (0211)  31 0010 


Und  wo  informieren  sich  CPC 
Anwender  Ober  News  & 
Trends,  neue  Software, 
neue  Computer  und  aktuelle 
Tips  &  Tricks?  In  der 


DATA  WELT  7  -8/86 


Wo  denn  sonstl 
DATA  WELT  7  8/86 
jetzt  am  Kiosk. 


Das  Superbuch  für  jeden  Joyce-Anwender. 

Alles  über  die  Textverarbelfung  LocoScripf 
und  über  das  Betriebssystem  CP/M;  Bedie¬ 
nung,  Anwendung  und  Lösungen  für 
dBase,  Multiplen  und  Wordstar;  BASIC- 
Röütinen  wie  Menü-  und  Maskengenerdfor 
und  rekursive  Grafikprogrammierung  In  . 
LOGO.  /JFt 

Das  große  JOYCE-Buch 
Hardcover,  424  Selten,  DM  59  - / 
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Abenteuer . 

Gamers  Message 

Obgleich  viele  unserer  Leser  derzeit 
lieber  irgendwo  in  der  Sonne  liegen  und 
sich  rundum  knusprig  braun  braten  las¬ 
sen,  meldet  sich  hier  die  Gamers  Mes¬ 
sage  mit  Tips  und  Tricks  für  alle  dieje¬ 
nigen,  die  ein  heißes  Computerspiel¬ 
match  einer  Bräunungs-Saison  vorzie¬ 
hen. 

ANDROIDENSCHAFE  UND  DEREN 
BÄNDIGUNG 

Den  Anfang  machen  hier  die  zwan¬ 
zig  Codewörter  für  die  einzelnen  Le¬ 
vel  bei  "One  Man  and  his  Droid". 

1.  Kein  Name 

2.  EMPIRE 

3.  PREDATORY 

4.  RUMINATE 

5.  RYEGRASS 

6.  VACUUM 

7.  VAMPIRE 

8.  RAGOUT 

9.  GRAIN 

10.  AASVOGEL 

11.  BLIZZARD 

12.  C LOCHE 

13.  COLANTER 

14.  ECTOPLASM 

15.  ECOLOGY 

16.  FEROCIOUS 

17.  FETLOCK 

18.  GOOSBERRY 

19.  GRAVITATE 

20.  UPANDAWAY 

Mit  diesen  Paßwörtern  kann  nun  je¬ 
dermann  in  jedem  Level  dieses  Spiels 
beginnen,  ohne  sich  vorher  durch  die 
davorliegenden  Stufen  zu  kämpfen. 

UNSTERBLICHE  SUCHER 

Wenn  Sie  sich  die  Mühe  machen  und 
anstelle  des  eigentlichen  Loaders  bei 
"Finders  Keepers"  das  nachfolgende 
kleine  Programm  zu  installieren,  ha¬ 
ben  Sie  keinen  Ärger  mehr  mit  zu 
wenig  Energie.  Die  steht  Ihnen  dann 
nämlich  unbegrenzt  zur  Verfügung. 
10  openout  ”d 
20  memory  &7ff 
30  load””,&800 
40  poke&20ce,0 
50  call&800 

Außerdem  noch  eine  kleine  Aufli¬ 
stung  der  Gegenstände,  die  mit  einem 
anderen  in  Verbindung  gebracht, 
einen  neuen  ergeben.  "Pile  of  Mud"  + 
"Spark  of  Life”  =  "Mud  Monster”,  ”A 
Blacksmith"  +  "A  broken  Sword"  = 
"Excalibur”,  ”A  empty  Bottle"  +  ”A 
Model  Boat”  =  ”A  Bottle  Ship",  "A 
Lead  Bar”  -F  "Sages  Stone"  =  ”A 
Gold  Bar”.  Zu  guter  Letzt  können  Sie 
sich  aus  "Salpetre  -F  "Sulphur”  + 
"Charcol”  +  "Magic  Flame”  Schieß¬ 
pulver  mixen,  und  damit  die  Katze 
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vor  dem  Ausgang  wegsprengen.  Mit 
dem  Miniprog  und  den  Tips  sollte  es 
eigentlich  jetzt  jedermann  schaffen, 
dieses  Spiel  bis  zum  Ende  zu  brin¬ 
gen. 

PROFESSOREN,  GOLDENE  ÄP¬ 
FEL  UND  ANDERES  ZEUG 

Für  ein  recht  neues  Spiel,  nämlich 
"Contraption”  von  Audiogenic,  ha¬ 
ben  wir  hier  ein  vergleichbares  klei¬ 
nes  Programm,  das  wie  das  von  "Fin¬ 
ders  Keepers"  gehandhabt  wird. 

10  openout”d” 

20  memory  1999 
30  load”",  15000 
40  call286500 
50  load””,  15700 
60  poke&5ec9,0 
70  poke&5eca,0 
80  poke&5ecb,0 
90  poke&5ecc,0 
100  call23700 

COMETEN  FINISH 

Als  kleine  Lockerungsübung  hier 
ganz  am  Rande  ein  Minitip  zu 
"Comet”. 

Um  ohne  große  Schlachten  in  das 
letzte  Bild  zu  gelangen,  brauchen  Sie 
lediglich  das  Spiel  zu  "pausen",  und 
dann  gleichzeitig  die  Tasten  0  und  9 
niederzudrücken. 

DAS  PLUS  VON  SORCERY+ 

Eines  der  besten  C'PC-Spiele  ist  nach 
wie  vor  Sorcery  und  das  "follow  up” 
Sorcery-f .  Daß  es  in  diesem  Action- 
Adventure  so  manches  Rätsel  zu 
lösen  gilt,  versteht  sich  von  selbst.  Ste¬ 
fan  Achilles  ist  es  gelungen,  den 
üblen  NECROMANCER  zu  besie¬ 
gen.  Im  folgenden  verrät  er  nun  das 
”know  how”. 

Zuerst  sollte  man,  wenn  Sorcery-F  ge¬ 
löst  ist,  einen  "GOBLET  OF  WTNE" 
mitnehmen.  Es  erleichtert  Sorcery-F 
unheimlich.  Jetzt  betritt  man  die 
linke  obere  Tür  und  beginnt  mit  dem 
zweiten  Teil  des  Spieles.  Bei  "NEAR 
THE  GATEHOUSE"  kommt  man 
mit  dem  Goldenen  Schlüssel,  der  vor 
der  Tür  liegt,  herein.  Dann  ist  man 
"IN  THE  GATEHOUSE”.  gehl  mit 
der  "STRANGELOOP  CASSETTE” 
in  die  linke  untere  Tür,  jetzt  befindet 
man  sich  "UNDER  THE  GA¬ 
TEHOUSE”,  befreit  das  Herz  mit  der 
"STRANGELOOP  CASSETTE", 
bringt  dieses  in  Sicherheit  und  holt 
den  Silbernen  Schlüssel.  Dann  geht 
man  wieder  heraus,  in  die  obere 
rechte  Tür  und  kommt  dann 
"UNDER  THE  BELFRY"  (mit  dem 
Kreuz  kann  man  einen  von  den  bei¬ 
den  Dämonen  töten).  Jetzt  geht  man 
in  die  linke  obere  Tür,  holt  sich  eine 


Glocke;  dann  muß  man  den  ganzen 
Weg  zurückgehen  bis  vor  das  Haus 
"NEAR  THE  GATEHOUSE".  Man 
geht  durch  die  untere  linke  Tür  (Vor¬ 
sicht  vor  dem  Schlamm)  und  holt  sich 
mit  der  Glocke  die  "COPY  OF 
AMSTRAD  USER”.  Dann  geht  man 
zurück  und  holt  sich  die  "GLASS 
BOTTLE"  und  kehrt  zurück,  öffnet  die 
Schlammwand.  Danach  wird  der  Sil¬ 
berne  Schlüssel  wieder  geholt,  mit 
ihm  geht  man  durch  die  hinter  der 
Schlammwand  befindliche  Tür.  Dort 
kann  man  erst  einmal  wieder  neue 
Energie  tanken  (zieht  niemals  ab). 
Jetzt  holt  man  sich  einen  Stock 
"WOODEN  CLUB”  und  geht  durch 
eine  der  drei  unteren  linken  Türen 
(mehrmals  versuchen,  Tür  klemmt). 
Nun  ist  man  ”ON  THE  BRIDGE". 
Mit  dem  Stock  können  Sie  nun  die 
Schlammwand  öffnen.  Danach  holt 
man  sich  einen  weiteren  Stock  und 
geht  in  die  linke  Tür  (Vorsicht,  der 
Steg  ist  auf  der  anderen  Seite  gebro¬ 
chen).  Mit  dem  Stock  berührt  man  die 
Pflanze  und  schon  öffnet  sich  die 
Tür.  In  dem  nächsten  Bild  sollte  man 
nicht  auftanken  (zieht  immer  ab). 
Jetzt  ist  es  an  der  Zeit,  das  Herz  und 
die  Copy  of  Amstrad-User  nachzuho¬ 
len.  In  diesem  Bild  "NEAR  THE 
HIDEOUT"  können  Sie  beide  Teile 
liegen  lassen  und  fünfmal  durch  die 
linke  obere  Tür  gehen.  Dabei  besor¬ 
gen  Sie  sich  einen  Silbernen  Schlüs¬ 
sel.  Dann  müßten  Sie  bei  "NF.AR 
THE  HIDEOUT"  angekommen  sein 
und  zweimal  durch  die  linke  untere 
Tür  gehen.  Jetzt  sind  Sie  "AT  THE 
HIDEOUT  ENTRANCE”,  gehen 
durch  die  rechte  Tür  "NEAR  THE 
NECROMANCER"  und  nehmen  die 
zwei  Herzen. 

Dann  gehen  Sie  wieder  nach  rechts 
"THE  MAIN  H  ALL”  und  drücken  den 
Feuerknopf.  Jetzt  holen  Sie  das  dritte 
Herz  und  den  "COPY  OF  AMS¬ 
TRAD-USER”  hierhin.  Mit  dem 
"COPY  OF  AMSTRAD-USER”  geht 
man  "AT  THE  HIDEOUT  ENT¬ 
RANCE"  durch  die  Schlammwand 
(läßt  sich  nur  mit  GLASS  BOTTLE 
öffnen).  Dann  sind  Sie  im  "DESER- 
TED  CELLAR”  und  gehen  durch  die 
linke  Tür  (können  vorher  auftanken). 
Nun  befindet  man  sich  "JUST  IN 
TIME”  und  holt  sich  "Roland".  Dann 
verläßt  man  den  Raum,  geht  in 
"DESERTED  CELLAR"  in  die 
rechte  untere  Tür,  wo  man  Roland 
per  Feuerknopf  ins  Wasser  wirft  und 
ein  viertes  und  letztes  Herz  erhält. 
Damit  geht  man  wieder  zur  "MAIN 
HALL”  und  Sorcery-F  wäre  damit 
gelöst. 
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Joyce-Trainingsseminare 


Seit  der  Markteinführung  des  Schnei¬ 
der  Joyce  sind  nun  einige  Monate  ver¬ 
gangen,  etwa  30.000  Systeme  sind 
inzwischen  hierzulande  verkauft  wor¬ 
den.  Ursprünglich  als  kompaktes 
Textsystem  für  Büroetagen  angeprie¬ 
sen,  stellte  sich  aber  schon  bald  heraus, 
daß  der  Joyce  weit  mehr  als  nur  eine 
komfortable  Speicherschreibmaschine 
mit  Monitor  ist. 

Pfiffige  Anwender  merkten  schnell, 
daß  mit  dem  Joyce  eine  preiswerte 
CP/M-Maschine  gemeint  war,  die 
von  Beginn  an  auf  eine  recht  große 
Software-Palette  zugreifen  konnte. 
Schwieriger  war  es  dann  doch,  einer 
Sekretärin  die,  im  Vergleich  zu  Ihrer 
gewohnten  Schreibmaschine,  recht 
seltsame  Tastatur  schmackhaft  zu 
machen.  Da  eine  Sekretärin  bekannt¬ 
lich  das  10-Finger-Schreibsystem  be¬ 
herrscht  und  auch  beim  Arbeiten  mit 
der  Schreibmaschine  keine  zusätzli¬ 
chen  Funktionstasten  ä  la  Joyce  be¬ 
nötigt,  ist  eine  Umstellung  unum¬ 
gänglich. 

Um  ein  solch  revolutionäres  Schreib¬ 
system  wie  den  Joyce  an  den  Mann 
bzw.  Frau  zu  bringen,  benötigt  man 
neben  einem  guten  Händlernetz 
auch  das  entsprechende  Fachperso¬ 
nal  in  den  einzelnen  Verkaufsstel¬ 
len. 

Die  Fa.  Schneider  beauftragte  dazu 
im  vergangenen  halben  Jahr  das 
Institut  Leidinger  &  Haupenthal  mit 
entsprechenden  Produktschulungen 
für  Händler. 

Diese  Schulungen  wurden  in  Tagcs- 
seminarform  in  Hotels  der  Novotel- 
klasse  mit  großem  Erfolg  durchge¬ 
führt.  Aufgrund  einer  starken  Nach¬ 
frage,  seitens  der  privaten  Anwender, 


hat  das  Institut  entsprechende  Semi¬ 
nare  für  Privatleute  im  Zeitraum  Juli 
bis  August  geplant. 

Diese  Veranstaltungen  finden  bun¬ 
desweit  in  folgenden  Städten  statt: 
Berlin,  Hamburg,  München,  Frank¬ 
furt,  Bremen,  Hannover,  Köln,  Sie¬ 
gen,  Dortmund.  Stuttgart,  Freiburg, 
Nürnberg,  Mannheim,  Saarbrücken 
und  Trier. 

In  erster  Linie  geht  es  bei  diesen  Se¬ 
minaren  um  das  Textverarbeitungs¬ 
system  Locoscript. 

Der  Teilnehmer  soll  nach  Beendi¬ 
gung  des  Seminars  den  Joyce  sinnvoll 
als  Textsystem  einsetzen  können. 
Alle  möglichen  und  erforderlichen 
Handgriffe,  angefangen  von  der  For¬ 
matierung  von  Disketten  über  die  Be¬ 
sonderheiten  von  Locoscript  zur 
Organisation  von  Texten,  werden  be¬ 
sprochen  und  systematisch  trainiert. 
Des  weiteren  stehen  Einsatzmöglich¬ 
keiten  des  Joyce  im  privaten,  berufli¬ 
chen  und  betrieblichen  Bereich  sowie 
ein  grober  Softwareüberblick  auf 
dem  Programm.  Im  Unterricht  erhält 
jeder  Teilnehmer  ein  25  DIN-A4- 
Seiten  umfassendes  Nachschlage- 


Joyce . 

werk,  das  u.a.  einen  Softwareüber¬ 
blick  beinhaltet  und  jeder  Teilneh¬ 
mer  mit  nach  Hause  bekommt. 

Jedem  Seminar-Teilnehmer  steht  ein 
eigener  Joyce  zur  Verfügung,  die  Teil¬ 
nehmerzahl  ist  auf  maximal  12  Per¬ 
sonen  begrenzt. 

Der  Preis  für  ein  Tagesseminar,  das 
in  der  Regel  am  Sonnabend  'stattfin¬ 
det,  beläuft  sich  auf  etwa  DM  199,-. 


Freizeit  und  Computer 


Als  Alternative  zu  den  Tagesveran¬ 
staltungen  werden  neuerdings  auch 
kombinierte  Wochenendseminare 
angeboten,  bei  denen  der  Partner 
ohne  Seminarteilnahme  mitfahren 
kann.  Hier  steht  die  Freizeit  eindeutig 
im  Vordergrund.  Die  Unterrichts¬ 
dauer  beträgt  in  diesem  Falle  14  Stun¬ 
den,  ein  Wochenendseminar  dauert 
von  Freitag  nachmittag  bis  zum 
Sonntag  und  findet  ohne  Ausnahme 
im  Schw'arzwälder  Hochwald  statt. 
Hier  stehen  mehrere  Alternativen 
und  Preisklassen  zur  Auswahl,  der 
Preis  richtet  sich  nach  der  Hotelwahl 
(DM  310  -  bis  DM  599,-). 

Wie  vom  Veranstalter  zu  erfahren 
war,  besaßen  viele  Teilnehmer  keine 
oder  kaum  Kenntnisse  über  den 
Computer  selbst.  Daher  wurde  eine 
zusätzliche  Veranstaltung  ins  Leben 
gerufen,  die  sich  der  Materie  Compu¬ 
ter  annimmt  und  deren  Arbeitsweise 
anschaulich  und  verständlich  dar¬ 
stellt.  Diese  Veranstaltungen  sind 
entweder  als  Abendschul-  oder 
Wochenendunterricht  ausgelegt,  nä¬ 
here  Informationen  hierzu  erhalten 
Sie  direkt  beim  Veranstalter. 

Im  Gespräch  mit  mehreren  Seminar¬ 
teilnehmern  konnten  wir  erfahren, 
daß  man  durchweg  mit  den  Leistun¬ 
gen  des  Veranstalters  zufrieden  war 
und  auch  die  vielfältigen  Angebote 
großen  Anklang  fanden.  (SR) 


Inserentenverzeichnis  Nr. 

8 

Activision 

47,111 

Dobbertin 

115 

Peter  West  Records 

33 

Algo 

7 

D+G  Datentechnik 

59 

PiZie  Data 

85 

Ariolasoft 

61 

EDV  Partner 

11 

Probst 

63 

Byte  me 

43 

Elektor 

57 

SFK 

10 

Comal 

59 

Elektronik  Center 

11 

Sikos 

39 

Computer  Büromaschinen  Service  55 

Fricke 

65 

Schneider  Computer 

68,69,136 

Computer  Max 

39 

Gerdes 

85 

Schneider  Data 

93 

CSE  Schauties 

9 

GFA  Integral  Hydraulik 

2 

Schuster 

98,99 

CSM 

45 

Heimcomputer  Shop 

29 

Star  Division 

26,27 

Dastmobil 

113 

Kopisch 

55 

Van  der  Zalm 

13 

Data  Becker 

51,131 

Leidinger  &  Haupenthal 

65 

Vortex 

118,119 

Data  Media 

83 

Mirror  Soft 

15 

Weeske 

21 

Data  Tech 

104 

Mükra 

31 

Werder 

10 
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Vorschau1 


„Schneider  CRC  9/86” 
erhalten  Sie  ab  27.  August 
bei  Ihrem 

Zeitschriftenhändler 


Joyce-Software  ist  im  Kommen! 

Wir  haben  alle  Joyce-Programme  für  Sie 
zusammengetragen  und  stellen  Ihnen  diese  in 
einer  großen  Marktübersicht  vor. 


Die  Simulation  ökologischer  Systeme  auf 
dem  Computer  ist  eine  Herausforderung  für 
jeden  Programmierer.  Anhand  des  bekannten 
Wolf-Schaf-Gras-Modells  läßt  sich  die  Pro¬ 
blematik  anschaulich  verfolgen. 


Die  serielle  Schnittstelle  wurde  einem  aus¬ 
führlichen  Praxistest  unterzogen.  Das  origi¬ 
nal  Amstrad-lnterface  überrascht  durch 
einige  Features,  die  das  Arbeiten  eines 
Programmierers  wesentlich  erleichtern. 


Serie: 


Der  nächste  Teil  unseres  beliebten 
Software-Experiments  beschäftigt 
sich  mit  der  Simulation  ökologischer 
Systeme.  Als  Grundlage  dient  das 
Wolf-Schaf-Gras-Modell,  das  in  ein¬ 
drucksvoller  Art  und  Weise  die  Ein¬ 
flüsse  und  Auswirkungen  verschiede¬ 
ner  Begebenheiten  auf  ein  ökologi¬ 
sches  System  anschaulich  macht. 
Schon  jetzt  möchten  wir  allen  interes¬ 
sierten  Software-Experimentlern  die¬ 
se  Folge  ans  Herz  legen,  denn  auch 
Sie  können  einiges  zum  Gelingen 
dieser  komplexen  Serie  beitragen. 


Joyce: 

Joyce-Software  auf  einen  Blick! 

Unsere  große  Software-Übersicht 
zeigt  Ihnen  alle  Programme,  die  zur 
Zeit  für  den  Joyce  erhältlich  sind.  Des 
weiteren  stellen  wir  Ihnen  das 
McLin-Programmgenerator-System 
vor,  mit  dem  Sie  auf  einfache  Art 
eigene  Programme  erstellen  können. 


Programme: 

U.a.  präsentieren  wir  Diskmat  -  das 
komfortable  Diskettenarchiv! 

Auf  dieses  Programm  haben  alle 
Diskettenbenutzer  gewartet.  Diskmat 
archiviert  Ihre  Programme  durch 
einfaches  Einlegen  der  Diskette  - 
schon  haben  Sie  Ordnung  in  Ihrer 
Programmsammlung. 


Hardware: 


SCHNEIDERWARE  #  4 

Kraftwerk  für  die  Erweiterungen 
-  das  universelle  Netzteil  im  Selbst¬ 
bau! 

Die  Schwächen  der  Stromversorgung 
des  CPC  gerade  in  Hinsicht  auf 
weitere  Karten,  werden  hierdurch  ein 
für  allemal  eliminiert. 


Tips  &  Tricks: 

Der  Tip  des  Monats: 
Bildschirmkompressor 

-  sparen  Sie  Speicherplatz  auf  Ihrem 


Datenträger  beim  Abspeichern  von 
HiRes-Bildern  mit  dieser  tollen 
RSX-Erweiterung! 

UDG-Designer 

-  der  komfortable  Zeichengenerator 
für  alle  CPC'! 

Super-Hilfsprogramm  zum  Defi¬ 
nieren  eigener  Grafikzeichen  bzw. 
kompletter  Zeichensätze.  Die  ent¬ 
worfenen  Zeichen  werden  gleich¬ 
zeitig  in  allen  drei  Modi  dargestellt, 
die  entsprechenden  Werte  lassen 
sich  in  HEX.DEZ  und  BIN  abru- 
fen. 

Der  UDG-Designer  ist  komplett 
menuegesteuert  und  bietet  zahlrei¬ 
che  Optionen. 


CP/M: 


Rando  und  die  Gappys! 

Wir  vermitteln  weiteres  Wissen  über 
die  Handhabung  von  CP/M  und  ver¬ 
tiefen  die  Praxis  im  Umgang  mit  den 
Tools.  Rando  und  die  Gappys  soll 
Ihnen  demonstrieren,  wie  schnell  Be¬ 
wegungsabläufe  unter  CP/M  pro¬ 
grammiert  werden  können,  selbst 
wenn  man  beim  Programmieren 
nicht  gegen  die  Konventionen  der 
BDOS-Calls  verstößt. 


Test: 


Auf  dem  CPC-Prüfstand  mußten 
zwei  Hardware-Produkte  ihre  Lei¬ 
stungsfähigkeit  unter  Beweis  stellen. 
Getestet  haben  wir  die  original  RS- 
232-Schnittstelle  von  Amstrad,  die 
sowohl  unter  Basic  als  auch  unter 
CP/M  zu  verwenden  ist. 

Auf  Herz  und  Nieren  geprüft  wurde 
auch  die  Speichererweiterung  von 
dk’tronics,  die  seit  kurzem  auch  bei 
uns  erhältlich  ist. 

Alles  Wissenswerte  dazu  erfahren  Sie 
in  der  nächsten  Ausgabe. 


Software  Reviews: 


Spiele: 

Equinox 

Biggles 

Gunfright 

Shogun 

Anwendungen: 

Turbo-Basic  -  der  neue  Compiler 

A.D.A.M 

Profi-Basic 


1  34  CPC  8  ’86 


Software  von  Lesern  -  für  Leser 


7  Programme  för 

Cpc 464/664/6128 


Die  Bezeichnung 
»Goldene  Sieben« 
steht  künftig  für  gute 
Software,  die  von  den  Le¬ 
sern  unserer  Zeitschrift  erstellt 
worden  ist,  und  nicht  als  Listing  im 
Heft  abgedruckt  werden  kann,  da 
hierfür  nur  einbegrenzter  Raum  vorhanden  ist,  und 
Ihre  "Schneider  CPC  International"  kein  reines  Li- 
stingblättchen  sein  soll! 

Jeweils  sieben  tolle  Programme  sind  auf  der 
Kassette  bzw.  Diskette  für  wenig  Geld  enthal- 


Berg  der  Monster 

Grauenerregende  Ungeheuer  fer- 
rorisieren  einen  abgelegenen 
Landstrich  in  den  Bergen.  Als 


ten. 

Preise: 

Kassettenversion  20,-  DM 

3"- Diskettenversion  30,-  DM 

zuzüglich  3,-  DM  Porto/Verpackung 
(Im  Ausland  5,—  DM) 

Bei  Nachnahme  kommt  noch  die 
die  Nachnahmegebühr  hinzu. 

Ihre  Bestellung  richten  Sie  bitte  an: 

DMV  Verlag 
-  Leserservice  - 
Postfach  250 
3440  Ischwege 

Bitte  Bestellkarte 
benutzen! 


Lehensherr  dieser  Provinz  bekom¬ 
men  Sie  vom  König  den  Auftrag, 
wieder  Ruhe  und  Ordnung  zu 
schaffen.  Als  Sie  sich  zu  Ihrer 
Mission  aufmachen,  werden  Sie 
von  einem  Schneesturm  überrascht. 

Nach  dem  Unwetter  stehen  Sie 
ohne  Ausrüstung  und  Hilfe  alleine 
inmitten  der  Berge. 

Gelingt  es  Ihnen  trotzdem,  Ihren 
Auftrag  zu  erfüllen? 

Poker 

Kartenspieler  hergehört:  wollen  Sie 
ganze  Nächte  durchzocken,  ohne 
Muttis  Haushaltsgeld  zu  verspie¬ 
len?  Bitte  sehr,  unser  Computer¬ 
poker  macht's  möglich.  Gewinnen 
können  Sie  zwar  nichts,  aber  trai¬ 
nieren  läßt  sich  mit  diesem  Spiel 
umso  besser. 

Super  Chance 

Verwandeln  Sie  ihren  CPC  in  einen 
einarmigen  Banditen.  Mit  dieser 
Spielhallensimulation  holen  Sie 
sich  ein  Stück  Las  Vegas  in  Ihr 
Wohnzimmer.  Mit  Jackpot  und 
Superchance. 

Coptaln  Starships  Test 

Begleiten  Sie  Captain  Starlight 
auf  seiner  Weltraumexpedition. 

Doch  zuerst  müssen  Sie  beweisen, 
daß  Sie  die  notwendigen  Quali¬ 
täten  mitbringen.  Ein  kniffeliger 
Intelligenz-  und  Reaktionstest  steht 
Ihnen  bevor.  Sind  Sie  in  der  Lage 
zu  bestehen? 

Oil  Willi 

Sie  sind  der  nette  Heizölhändler, 
der  alle  Bewohner  seines  Stadtvier¬ 
tels  mit  Heizöl  versorgt.  Aber  die 
meisten  Bestellungen  sind  sehr  eilig. 

Und  wenn  Sie  nicht  schnell  genug 
liefern,  so  bestellen  sich  die  Leute 
ihr  Öl  eben  anderswo.  Da  kann 
man  schon  ganz  schön  ins  Schwit¬ 
zen  geraten. 


-  Auch  weiterhin  ist  die  "Goldene  7"  Nr.  1  mit  den  Programmen  Secret  of  Wizard, 

*  Turlen,  Zodora,  3-D  Labyrinth,  Die  alte  Burg,  Space-Race  und  Galaxis  erhältlich. 

Bitte  benutzen  Sie  die  Bestellkarte! 


DIE  GOLDENE  X* 


Schatz 

Als  Hubschrauberpilot  für  besonders  brenzlige  Einsätze  bekommen  Sie  den  Auftrag,  durch  ein 
verzwicktes  Höhiensystem  bis  zu  einem  legendären  Schatz  vorzudringen  und  mit  diesem  wieder 
heil  zurückzukehren. 

Aber  Vorsicht  ist  geboten,  der  Schatz  ist  schwer  und  die  Höhlen  verwinkelt  und  eng. 

Garten  Manager 

Als  Gärtner  hat  man  es  nicht  leicht.  Versorgen  Sie  das  Grünzeug  in  Ihrem  Garten  richtig,  dann  kann 
gar  nichts  passieren.  Abgesehen  davon,  daß  Sie  überall  das  Unkraut  jäten  und  die  Blumen  gießen 
müssen,  geht  fast  alles  wie  von  selbst. 

Doch  das  Unkraut  wuchert  wie  wild  und  die  Blumen  brauchen  immer  mehr  Wasser.  Haben  Sie  einen 
grünen  Daumen? 


Wo  gibt’s 
denn  sowas:* 
Preisknüller 
des  Jahres 
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II 


COUPON 


Ich  möchte  mehr  wissen  über 
den  Preisknüller  des  Jahres 


Name 


PLZ  Ort 


Straße 

ac  absatz-communication 
Pauck  +  Partner  GmbH  +  Co. 
Widenmayerstraße  34 

8000  München  22 


komplett 
jetzt  nur  noch 

DM 

unverbindliche 
Preisempfehlung 

*Sowas  gibt’s  überall 
im  guten  Fachhandel,  in  den 
Fachabteilungen  der  Warenhäuser 
und  bei  den  führenden  Versendern. 
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